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Operaciones con objetos 


ACIO? objeto. 

Devuelve CIERTO si 
el objeto es la palabra vacía 
o la lista vacía, si no, devuel- 
ve FALSO. 


? ESCRIBE VACIO? " 
CIERTO ' 


? ESCRIBE VACIO? "A 
FALSO 


? ESCRIBE VACIO? [] 
CIERTO 


? ESCRIBE VACIO? [ALGO] 
FALSO 


NOTA: En el LOGO del SPECTRUM la 
sintaxis de esta primitiva es: 

ESTA.VACIA? objeto 

— PRIMERO objeto 
abreviada: 


PRI objeto. 

Esta primitiva devuelve el primer ele- 
mento del objeto especificado. 

Si el objeto es una palabra devuelve la 
primera letra. 


? ESCRIBE PRIMERO "CASA 
C 


? ESCRIBE PRIMERO "A 
A 


PRIMERO no acepta como dato la pala- 
bra vacía. 


? ESCRIBE PRIMERO " , 
_PRINO ACEPTA COMO DATO 


Si el objeto es un número, debemos te- 
ner en cuenta los siguientes casos: 


?ESCRIBE PRI *.5 


ESCRIBE PRI .5 
0 


Si el objeto es una lista, devuelve la pri- 
mera palabra o la primera lista. 


? ESCRIBE PRIMERO [ESTO ES MUY 
SENCILLO] ESTO 


? ESCRIBE PRIMERO [HOLA] 
HOLA 


? ESCRIBE PRIMERO [([ENERO FEBRE- 
RO MARZO] TRIMESTRE] 
ENERO FEBRERO MARZO 


El objeto especificado no puede ser la 
lista vacía. 


? ESCRIBE PRIMERO [] 
PRI NO ACEPTA [] CÓMO DATO 


— ULTIMO objeto 
abreviada: 


UL objeto 
Devuelve el último elemento del objeti- 
vo especificado. 


Si el objeto es una palabra devuelve la 
última letra. 


? ESCRIBE ULTIMO "CASA 
A 


? ESCRIBE ULTIMO "A 
A 
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? ESCRIBE UL " 
UL NO ACEPTA COMO DATO 


Particularidades si el objeto es un nú- 
mero: 


? ESCRIBE UL "1.20 
0 


? ESCRIBE UL 1.20 
2 


Si el objeto es una lista, devuelve la úl- 
tima palabra o la última lista. 


? ESCRIBE UL [RAPIDO Y SENCILLO] 

SENCILLO 

? ESCRIBE UL [MAS RAPIDO [MAS SEN- 
CILLO] [SENCILLISIMO]] 

SENCILLISIMO 


? ESCRIBE UL (] 

UL NO ACEPTA [] COMO DATO 

— IGUALES objetol objeto2 

Devuelve CIERTO si objetol y objeto2 
son iguales, si no, devuelve FALSO. 


? ESCRIBE IGUALES? "A "A 
CIERTO 


? ESCRIBE IGUALES? “.1 *0.1 
CIERTO 


? ESCRIBE IGUALES? [DOS PALABRAS] 
[DOS PALABRAS] 
CIERTO 


Podemos utilizar la escritura infija de 
esta operación. 


? ESCRIBE "AS ="AS 
CIERTO 


El siguiente procedimiento escribe una ' 


palabra que empieza por la letra que introduz- 
camos: 


(Sólo letras de la A a la E) 


? PARA LETRAS 

> HAZ "C LC 

> SI :C ="A [ESCRIBE "“AMERICA] 
> SI :C = "B [ESCRIBE "BARCO] 

> SI :C = "C [ESCRIBE "CASA] 

> SI :C = "D [ESCRIBE “DADO] 

> SI :C = "E [ESCRIBE “ESCUELA] 
> FIN 


Y A NDODDTRARNITTOO Y 

La primitiva PRIMER: 
lamanta dal nhiate 
elemento del objeto 


5 A 
AUTE TERTAOA 


LD A a 


Si ejecutamos el procedimiento LETRAS 
y pulsamos la tecla A, en la pantalla aparece- 
rá la palabra AMERICA. 


? LETRAS 
AMERICA 


NOTA: En el LOGO del SPECTRUM la 
sintaxis de esta primitiva es: 


ES.IGUAL? objetol objeto2 


=- Gestión de archivos 
(sólo PC-COMPATIBLES) 


A continuación explicamos la función 
de cuatro primitivas que podemos encontrar 
en algunas versiones de LOGO para los PC- 
COMPATIBLES. 


— PONPOSESCRITURA n 
Coloca el puntero en la posición n del 


.archivo que en ese momento esté abierto para 


la escritura. 

En número n indica la posición del pun- 
tero en el archivo, en octetos, puede variar en- 
tre 0 y la longitud total del archivo, 


? ABRE "TEXTO 

? PONESCRITURA “TEXTO 
? PONPOSESCRITURA 10 
? ESCRIBE [PRUEBA 1] 

? PONPOSESCRITURA 20 
? ESCRIBE [PRUEBA 2] 

? CIERRA "TEXTO 


Abrimos el archivo TEXTO para escri- 
tura, colocamos el puntero en el décimo octe- 
to y escribimos PRUEBA 1, colocamos el pun- 
tero en el octeto 20 y escribimos PRUEBA 2. 

Recuerda que un octeto equivale a un 
carácter. 

Comprobemos el contenido del archivo 
TEXTO desde el sistema operativo. 


A> TYPE TEXTO 
PRUEBA 1 
PRUEBA 2 


— PONPOSLECTURA n 

Coloca el puntero en la posición n del fi- 
chero abierto para lectura en ese momento. 

El número n (número de octeto) puede 
variar entre 0 y la longitud total del archivo. 


A + 
A A 


? ABRE “TEXTO 

? PONLECTURA "TEXTO 
? PONPOSLECTURA 0 

? HAZ 'C LL 

? HAZ "'B LL 

? CIERRA “TEXTO 

? ESCRIBE :C 

? ESCRIBE :B 


En la pantalla aparece: 


PRUEBA 1 
PRUEBA 2 


Las dos listas que anteriormente hemos 
guardado en el archivo TEXTO. 

Veamos otro ejemplo utilizando PON- 
POSESCRITURA y PONPOSLECTURA. 


? PARA Pl 

> ABRE "TEXTO 

> PONESCRITURA “TEXTO 
> PONPOSESCRITURA 8 
> ESCRIBE "LOLA 

> PONPOSESCRITURA 14 
> ESCRIBE "PPP 

> CIERRA “TEXTO 

> FIN 

? PARA P2 

> ABRE "TEXTO 

> PONLECTURA "TEXTO 
> ESCRIBE LL 

> ESCRIBE LL 

> CIERRA “TEXTO 

> FIN 


Ejecutamos primero el procedimiento 
que escribe datos en el archivo TEXTO. 


? Pl 


Los datos ya se habrán guardado en el 
archivo, leámoslos con el procedimiento P2. 


? P2 
En la pantalla aparece: 


PRUEBA ILOLA 
PPP 


— POSESCRITURA 


Esta primitiva devuelve la posición del 


puntero en el archivo actualmente abierto 
para escritura. 


? ABRE "TEXTOl1 

? PONESCRITURA “TEXTO1 
? PONPOSESCRITURA 0 

? HAS "A PONESCRITURA 
? ESCRIBE “HOLA 

? HAZ "'B POSESCRITURA 

? CIERRA “TEXTO 1 

? ESCRIBE :A ESCRIBE :B 


El contenido de la variable A es cero y 
el de la variable B seis. 

Hemos asignado la posición del punte- 
ro a dos variables que más tarde hemos :con- 
sultado, porque si hubiésemos utilizado la or- 
den ESCRIBE, los dos números se habrían es- 
crito en el archivo TEXTO1 y no en la pantalla 
como queríamos. 


— POSLECTURA 
Devuelve la posición del puntero en el 
archivo actualmente abierto para lectura. 


? ABRE "TEXTO1 
? PONLECTURA "TEXTO1 
? ESCRIBE POSLECTURA 


La posición del puntero es 0. 


=- Procedimientos en grupos 


Algunas versiones de Logo dispone de 
una serie de primitivas para manejar los pro- 
cedimientos en grupos. 

La primitiva que a continuación vamos 
a exponer sólo podemos encontrarlas en algu- 
nas versiones del Logo para los PC-COMPATI- 
BLES. 

— AGRUPAR PROCEDIMIENTOS 

Existe una orden con la que podemos 
crearnos diferentes grupos de procedimien- 
tos: 


? AGRUPA "grupo [lista procedimien- 
tos] 


Esta orden agrupa bajo el nombre del 
grupo que se especifica, los procedimientos 
que se señalan en la lista. 

De esta forma podemos crearnos sub- 
conjuntos en el área de trabajo de la memoria 
del ordenador y tener de forma más estructu- 
rada y organizada los procedimientos defi- 
nidos. 


. e .Py¿e "E 
Ñ , , . y Y, NN 
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El tener los procedimientos agrupados 
nos permite también guardar en archivos un 
grupo determinado de procedimientos, sin ne- 
cesidad de especificar el nombre de cada uno 
de ellos, sino especificando exclusivamente el 
nombre del grupo. 

Supongamos que tenemos definidos en 
memoria los siguientes procedimientos: 


RAIZ 

¿TRONCO 
RAMA 
HOJA 
PERRO 
GATO 
PAJARO 
PATO 


Dependiendo de la relación que guar- 
dan los procedimientos, podríamos definir dos 
grupos, uno que podríamos llamar ARBOL y 
otro ANIMALES: 


? AGRUPA “ARBOL [RAIZ TRONCO 
RAMA HOJA] 

? AGRUPA "DOMESTICOS [PERRO 
GATO PAJARO] 


Ahora podemos guardar por separado 
los grupos creados: 


? GUARDA "PLANTAS “ARBOL 


Los procedimientos del grupo ARBOL 
se guardan en el archivo PLANTAS. 


? GUARDA "ANIMALES "DOMESTICOS 


Los procedimientos del grupo DOMES- 
TICOS se guardan en el archivo ANIMALES. 

Otra primitiva que nos permite agrupar 
procedimientos es: 


? AGTODO "grupo 


Abreviatura de AGrupa TODO. 

Se agruparán bajo el nombre de grupo 
que se especifica todos los procedimientos y 
variables (con sus contenidos), que se encuen- 
tren en el área de trabajo de la memoria. 

Si alguno de los procedimientos está ya 
en un grupo, no podrá formar parte de éste. 


— BORRAR GRUPOS 

El Logo nos permite borrar los grupos 
que tengamos creados. Esto lo conseguimos 
gracias a la orden: 


Las 


primiti vas P 


? BOG “grupo 


Abreviatura de BOrra Grupo. 

Borra el grupo que se especifica del 
área de trabajo de la memoria. Es decir, todos 
los procedimientos que componen el grupo 
que se especifica se borrarán. 


— IMPRIMIR GRUPOS 

Los grupos que tenemos formados po- 
demos imprimirlos bien sea en la pantalla o en 
la pantalla y en la impresora. 

La orden que nos permite esto es: 


? IM “grupo 


Los procedimientos que componen el 
grupo que se especifica se presentarán en la 
pantalla del ordenador, 

Si la impresora está conectada y activa- 
do el canal de comunicación, obtendremos 
también en papel el listado de los procedi- 
mientos. 


— EDITAR GRUPOS 

Al igual que podemos presentar en el 
editor uno o varios procedimientos, también 
podemos ordenar que sea un grupo el que se 
edite. 

Esto lo conseguimos con la orden: 


? EDG "grupo' 


Abreviatura de EDita Grupo. 

Los procedimientos que componen el 
grupo que se especifica se presentará en el 
editor Logo. 


Cuadro resumen 


— VACIO? objeto 

Devuelve CIERTO si objeto es la pala- 
bra o la lista vacía, si no, devuelve FALSO, 

En el Logo del SPECTRUM la sintaxis es: 

ESTA.VACIA? objeto 


— PRIMERO objeto 

Devuelve el primer elemento de objeto. 

Si el objeto es una palabra, devuelve la 
primera letra, si es una lista, devuelve la pri- 
mera palabra o la primera lista. 


— ULTIMO objeto 
Devuelve el último elemento de objeto. 


Si objeto es una palabra, devuelve la úl- 
tima letra, si es una lista, devuelve la última 
palabra o la última lista. 


— IGUALES? objetol objeto2 

Devuelve CIERTO si objetol y objeto2 
son iguales, si no, devuelve FALSO. 

En el LOGO del SPECTRUM la sintaxis 
es: 

ES.IGUAL? objetol objeto2 


(Sólo PC-COMPATIBLES) 

— PONPONESCRITURA n 

Coloca el puntero en la posición n del 
archivo actualmente abierto para escritura. 


— PONPOSLECTURA n 
Coloca el puntero en la posición n del 
archivo actualmente abierto para lectura. 


— POSESCRITURA 
Devuelve la posición del puntero en el 
archivo actualmente abierto para escritura. 


— POSLECTURA 
Devuelve la posición del puntero en el 
archivo actualmente abierto para lectura. 


— ? AGRUPA "grupo [lista procedi- 
miento] 

Los procedimientos que se especifican 
en la lista se agruparán bajo el nombre de gru- 
po que se indica. 


— ? AGTODO "grupo 


Se agruparán bajo el nombre de grupo 
que se especifica todos los procedimientos y 
variables que haya en el área de trabajo de la 
memoria. 


— ? BOG "grupo 

Se borrará del área de trabajo los pro- 
cedimientos que componen el grupo que se 
especifica. 


— ? IM "grupo 

Los procedimientos que componen el 
grupo que se especifica se presentarán en la 
pantalla del ordenador y en la impresora (de 
estar ésta activada). É 


— ?EDG “grupo 

Entra en el editor Logo y muestra todos 
los procedimientos que componen el ¿qEABS 
que se especifica. 


IS A A 


' Ejercicios 

1. Define los procedimientos necesarios para 
realizar, hasta que se introduzca la palabra 
FIN, lo siguiente: 
a) Leer una palabra del teclado. 
b) Escribir en la pantalla la primera y la 
última letra de la palabra tecleada. 

2. Haz lo mismo que en el ejercicio anterior, 
pero en vez de con palabras con listas. 

3. Realiza el siguiente dibujo. 


Fig. 1. 


4. Define los procedimientos necesarios para 
dibujar en la pantalla lo que muestra la fi- 
gura siguiente: 


Fig. 2. 


Una vez hecho esto, tienes que para seña- 
lar con una flecha el número al azar asig- 
nado a una variable, a la vez que el núme- 
ro aparece el marcador superior. Este pro- 
ceso tiene que realizarse 100 veces. 
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5. ¿Son correctas las Órdenes siguientes? 


— ? ABRE "TABLA 
? PONLECTURA "TABLA 
? CIERRA "TABLA 
? ESCRIBE POSLECTURA 


? ABRE "TABLA 

? PONLECTURA "TABLA 
? PONPOSESCRITURA 0 
? ESCRIBE "ADIOS 

? CIERRA "TABLA 


? HAZ 'B ([] DONDE ESTAS TU [AQUI] 
? ESCRIBE PRIMERO :B 


? AGRUPA "MAMIFEROS 


? AGRUPA “EJEMPLO [A B C] 
? IMPRESORA 1 
? IMG "EJEMPLO 


? PARA A 

> BL 

> REPITE 4 [AV 5 CD 90] 
> FIN 


? PARA B 
> GD 90 AV 10 
> FIN 


? EDG "AB 


= Solución de los ejercicios 
1: 


El procedimiento CARAC lee una pala- 
bra del teclado, asigna a la variable B la pri- 
mera letra de la palabra, a la variable C la úl- 
tima letra, si la palabra tecleada es FIN detie- 
ne la ejecución, si no, se ejecuta el procedi- 
miento ESCRIBÍR y se realiza una llamada re- 
cursiva. 


? PARA CARAC 

> HAZ "A LP 

> HAZ 'B PRIMERO :A 

> HAZ "C ULTIMO :A 

> SI :A = "FIN [ALTO] [ESCRIBIR :B :C 
CARAC] 

> FIN 


ESCRIBIR escribe en la pantalla la pri- 
mera y la última letra de la palabra tecleada. 


? PARA ESCRIBIR :A :B 


> HAZ 'C LISTA :A :B 
> ESCRIBE :C 
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> ESCRIBE [] 
> FIN 


Si tu versión de LOGO no dispone de la 
primitiva LP, defínete un procedimiento que la 
simule. 


? PARA LEEP :D 

> HAZ "'X LC 

> SI ASCII :X = 13 [ESCRIBE :D ALTO] 
[HAZ "D PALABRA :D :X LEEP :D] 

> FIN 


Comprueba si todo funciona tecleando: 
? CARAC 
y las palabras que desees, por ejemplo: 


CASA 
CA 


PERRO 
pio 


SOMBRA 
SA 


FIN 


Cuando introduzcas la palabra FIN, la 
ejecución se detendrá. 


2: ¡ 


En este ejercicio, en vez de leer pala- 
bras, leemos listas. 


? PARA LISTAS 

> HAZ "A LL 

> HAZ 'B PRIMERO :A 

> HAZ "C ULTIMO :A 

> SI :A = [FIN] [ALTO] [ESCRIL :B :C 
LISTAS] 

> FIN 


? PARA ESCRIL :A :B 
> HAZ 'C LISTA :A :B 
> ESCRIBE :C 

> ESCRIBE [] 

> FIN 


Ejecuta el ejercicio tecleando: 
? LISTAS 
y las listas que desees. 
3: 
Para realizar el dibujo del radio-casete, 


definimos una serie de procedimientos que di- 
bujan diferentes partes de éste. 


procedimientos: 


it a UR ADA E 
103 yA ma A SENO. 28 


En primer lugar, definimos el que va a 


dibujar la caja: 


? PARA CAJA 

> SL 

> PONPOS [-60 -40] 

> BL 

> REPITE 2 [AV 60 GD 90 AV 120 GD 
90] 

> SL 

> PONPOS [-55 5] 

> REPITE 2 (AV 10 GD 90 AV 110 GD 
- 90] 

¡Sh 

> PONPOS [-22 -35] 

> BL 

> REPITE 2 [AV 10 GD 90 AV 44 GD 90] 
> AV 33 GD 90 

> AV 44 Gl 90 

> FIN 


Para dibujar los altavoces definimos los 


1 


? PARA ALTAVOZ 
> SL 

> PONPOS [-57 -35] 
> ALT 

> SL 

> PONPOS [22 -35] 
> ALT 

> FIN 


Este procedimiento es el que sitúa a la 


Tortuga en el lugar adecuado para que dibu- 
je los dos altavoces: ALT, es el que los dibuja: 


? PARA ALT 

> BL É 

> PONRUMBO 0 

> REPITE 4 [AV 35 GD 90] 
> SL 

> AV 13 GD 90 

> AV5CI90 

> BL 

> REPITE 10 [AV 8 GD 36] 
> SL 

> GD 90 AV 2 

> BL 

> RELLENA 

> FIN 
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[7 RT EN NIEVA AN 


La zona del casete la dibuja el siguien- 
te procedimiento: | 


? PARA CASETE 

> SL 

> PONRUMBO 0 

> PONPOS [-16 -21] 

> BL 

> REPITE 2 [AV 15 GD 90 AV 32 GD 90] 
> SL 

> AV3GD 90 

> AV6EGCI9 

> BL e 

> REPITE 2 [AV 8 GD 90 AV 20 GD 90] 
> FIN 


Para dibujar el dial de la radio defini- 
mos DIAL: 


? PARA DIAL 

> SL 

> PONPOS [-50 9] 

> BL 

> REPITE 2 [AV 2 GD 90 AV 100 GD 90] 
> SL 

> PONPOS [-30 7] 

> BL 

> REPITE 2 [AV 8 GD 90 AV 2 GD 90] 
> SL 

> AV3GD 90 

>AVl 

> BL 

> RELLENA 

> SL 

> GI90 AV 2 

> BL 

> RELLENA 

> FIN 


El procedimiento TECLAS es el que se 
encarga de dibujar las teclas. Realiza dos lla- 
mada a otros dos procedimientos que dibujan 
teclas diferentes en los lugares correspon 
dientes: 


? PARA TECLAS 

> SL 

> PONPOS [-23 21] 
> REPITE 6 [T] 

> SL 

> PONPOS [-50 20] 
> REPITE 2 [TT] 

> FIN 


irdar en archivos 


£da 
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? PARA TT 

> BL 

> PONRUMBO 0 

> REPITE 2 [AV 5 GD 90 AV 3 GD 90] 
> CD9WA10 

> FIN 


? PARA T 

> BL 

> PONRUMBO 0 
> AV3GCD 90 
> AV6GD 90 
> AV3GI90 

> SL 

>AV2 

> FIN 


Para dibujar el asa del radio-casete de- 


finimos: 


? PARA ASA 

> SL 

> PONPOS [-60 10] 
> PONRUMBO 270 
> BL 

> AV6GD 90 

> AV 25 GD 90 

> AV 132 GD 90 

> AV 25 GD 90 

> AV6 

> SL 

> PONPOS [-60 13] 
> BL 

>AV3 

> GD 90 AV 20 

> GD 90 AV 126 

> GD 90 AV 20 

> GD 90 AV 3 

> FIN 


La última parte a dibujar es la antena y 


lo róaliza al siguiente procedimiento: 


? PARA ANTENA 

> SL 

> PONPOS [55 20] 

> PONRUMBO 0 

> BL 

> REPITE 2 [AV 60 GD 90 AV 1 GD 90] 
> AV60GCI9 AV] 

> REPITE 4 [CD 90 AV 3] 

> FIN 


Una vez que tenemos todos los procedi- 


mientos definidos, los englobamos en uno que 
inicializa el proceso y los va llamando: 


y 2 5 . PR 
y 'P=hbrisTal” DIT Y ha] 
Pod CHMiOD CUllcaí ul 


? PARA RADIO 
> BP 

=> "0T 

> CAJA 

> ALTAVOZ 
> CASETE 
> DIAL 

> TECLAS 
> ASA 

> ANTENA 
> FIN 


Para ejecutarlo, bastará con introducir: 
? RADIO 


En primer lugar, definimos el procedi- 
miento que dibuja los 10 cuadros y el marca- 
dor superior: 


? PARA CUADROS 

> SL 

> PONPOS [-80 14] 

> REPITE 10 [REPITE 4 [BL AV 8 GD 90] 
SL GD 90 AV 16 GI 90] 

> SL ; 

> PONPOS [5 14 65] 

> BL 

> REPITE 2 [AV 13 GD 90 AV 20 GD 90] 
> FIN 


NUM, es el que escribe los números en- 
cima de los cuadrados: 


? PARA NUM. 

> PONCURSOR [10 9] 
> ES[0123456789] 
> FIN 


La flecha la va a dibujar FLECHA: 


? PARA FLECHA 
> PONY -10 

> PONRUMBO 0 
> AV 15 GD 45 
>RESAVS5S 

> GI 90 RE 5 

> ESPERA 10 

> FIN 


Las primeras órdenes de este procedi- 
miento son el posicionamiento siempre a la 
misma altura con respecto del eje Y, y con 
rumbo 0, para que la flecha se dibuje siempre 
a la misma altura y con igual orientación. 


+ O TO INE 
E cr, o e pl PROL 


El procedimiento CONTROL es el que 
se encarga, en primer lugar, de asignar un va- 
lor al azar a la variable A. Una vez realizado 
esto ejecuta el procedimiento VAL, que es el 
que va a escribir en el marcador el valor de 
la variable. 

A continuación consulta el valor de la 
variable y dependiendo de cuál sea, se posi- 
ciona en un punto determinado con respecto 
al eje X para a continuación ir a dibujar la fle- 
cha. Una vez dibujada, vuelve a colocarse en 
la misma posición inicial y vuelve a dibujar la 
flecha, pero en esta ocasión con la goma acti- 
va, por lo que ésta se borrará. 


? PARA CONTROL 

> HAZ" AZAR 10 

> VAL 

> SI:A = 0 [SL PONX -76 BL FLECHA 
SL PONX -76 GOMA C] 

> SI:A = 1 [SL PONX -60 BL FLECHA 
SL PONX -60 GOMA C] 

> SI:A = 2 [SL PONX -44 BL FLECHA 
SL PONX -44 GOMA C] 

> SI:A = 3 [SL PONX -28 BL FLECHA 
SL PONX -28 GOMA C] 

> SI:A = 4 [SL PONX -12 BL FLECHA 
SL PONX -12 GOMA C] 

> SI:A = 5 [SL PONX 4 BL FLECHA SL 
PONX 4 GOMA C] 

> SI:A = 6 [SL PONX 20 BL FLECHA SL 
PONX 20 GOMA C] 

> SI:A =7 [SL PONX 36 BL FLECHA SL 
PONX 36 GOMA C] 

> SI:A = 8 [SL PONX 52 BL FLECHA SL 
PONX 52 GOMA C] 

> SI:A = 9 [SL PONX 68 BL FLECHA SL 
PONX 68 GOMA C] 

> FIN 


VAL escribe el valor de la variable en 
posición adecuada: 


? PARA VAL 

> PONCURSOR [19 5] 
> ESA 

> FIN 


Una vez que tenemos todos los procedi- 
mientos necesarios, definimos uno para que 
inicialice y realice todo el proceso: 


? PARA PROCESO 
> BP 


7 E 


GEI UIUNDO> 105 DUCUC 


PEDIA NARRA NAAA AAA 


> BT 

> OT 

> CUADROS 

> NUM 

> SL 

> PONY -10 : Y 

> REPITE 100 [CONTROL] 
> FIN 


Para ejecutarlo bastará con introducir: 
? PROCESO 


— ? ABRE "TABLA 
? PONLECTURA “TABLA 
? CIERRA “TABLA 
? ESCRIBE POSLECTURA 


INCORRECTO 

El LOGO mostrará el mensaje: 

ARCHIVO NO ELEGIDO. 

Estamos preguntando la posición del 
puntero del archivo actualmente abierto para 
escritura, y no hay ningún archivo abierto. 


— ? ABRE "TABLA 
? PONLECTURA "TABLA 
? PONPOSESCRITURA 0 
? ESCRIBE "ADIOS 
? CIERRA “TABLA 


INCORRECTO 
Utilizamos la orden PONPOSESCRITU- 


RA y no hay ningún archivo abierto para escri-- 
tura, el LOGO muestra el mensaje de error: 


ARCHIVO NO ELEGIDO 


— ? HAZ 'B [[] DONDE ESTAS TU 
[AQUI] 
? ESCRIBE PRIMERO :B 


CORRECTO 
En la pantalla aparecerá una línea en 


blanco, pues el primer elemento de B es la lis- 
ta vacía. 


— ? AGRUPA “MAMIFEROS 


INCORRECTA ' 
, Falta indicar el nombre de los procedi- 


mientos que queremos que formen el grupo 
MAMIFEROS. 


le servir para 


. 2 A Y AE AA PMIARANE 
sy » j “— Ñ E, y ALÍ á a, mm 
¿er bel EL AAA IL 1 Cesos. 

A 


EXPERIENCIA Y PRACTICAS EN LOGO' 


— ? AGRUPA "EJEMPLO [A BC] > REPITE 4 [AV 5 GD 90] 
? IMPRESORA 1 4 > FIN 
? IMG “EJEMPLO ? PARA B 
Agrupamos en EJEMPLO los procedi- > GD 90 AV 10 
mientos A, B y C. > FIN 
Activamos la impresora y a continua- 2? EDG "AB 
ción imprimimos el grupo. Obtendremos, tan- 
to en la pantalla como en el papel, el listado INCORRECTA 


de los procedimientos A, B y C. Si queremos editar el grupo AB, tendre- 
— ?PARAA mos que haber creado anteriormente dicho 
> BL grupo. 


Puedes imprimir un grupo de 
procedimiento. 


Consulta los elementos de los objetos logo. 
La primitiva último se puede escribir UL. 


Podemos formar un grupo con todos los 
procedimientos que haya en la memoria. 


La primitiva vacio? devuelve como 
resultado CIERTO o FALSO. 


: Forma grupos con procedimientos que 
guarden relación. 


>") 
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N el tomo anterior vimos el 
programa PAC-MAN para 
IBM y compatibles; en éste 
vamos a ver una versión de 
este mismo programa para 
el SPECTRUM. 
En líneas generales, 
los dos programas han sido 
realizados de la misma manera, aunque se ha 


En este caso se han utilizado dos ins- 
trucciones nuevas que no hemos estudiado. 


Estas son: 
SCREEN (X, Y) 
ATTR (X,Y) 
Veamos qué función realiza cada una 
de ellas. 


La función SCREEN (X, Y) nos devuelve 
el carácter que se encuentra en la columna X 
de la fila Y, pero no nos dice nada sobre su co- 
lor. Para ello utilizamos la función ATTR (X,V), 
la cual nos dice si el carácter que se encuen- 
tra en las coordenadas X, Y está parpadeando, 
tiene brillo normal o encendido, de qué color 
es su tinta y su papel. 


El resultado de ATTR es un número en- 
tre O y 255. En este número (que es un BYTE) 
cada BIT tiene un valor específico y nos infor- 
ma de una parte del atributo. 


— Los tres primeros BITs me dicen el 
intentado sacar el mayor partido posible alas color de la tinta. 


características específicas de cada ordena- — Los segundos tres BITs me dicen el 
dor. color del papel. 
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— El BIT número 6 me dice si el carác- — El último BIT (el séptimo) me dice si 
ter tiene brillo normal (0) o resaltado (1). dicho carácter está en FLASH (1) o normal (0). 


10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
40 
50 
55 
60 
70 
80 
90 
100 
110 
120 
130 
140 
175 
180 
190 
192 
194 
195 
196 
197 
198 
200 
210 
220 
230 
240 
241 
242 
243 
244 
245 
260 


DIM 
DIM 
LET 


ISSO MIO lSlOSIlllalla lolo OK 
xk k 
xk PAC - MAN x 
xk k 
ES 


ISSO SIS IOISIO OO IOJOJOK 
* 

* PROGRAMADO POR: 

xk 

* Fco. Morales Guerrero. 
xk 

ISSO RoOjOlIOIOIOlOJOIOJOJOK 


XK k X k * 


Alai lalalala lalalafojolojojoloK 
* * 
* (c) Ediciones Siglo Cultural * 
* (c) 1987. k 
* k 
aaa alofalolalalololalojaalalojalolojojojojak - 


ISORA ok 


* INICIALIZACION x 
ASIA Sad lofVIOlolVJOoK 


N$(10, 14) 
P(10) 
PU=O 


BORDER. O 
PAPER O 


INK 
CLS 


7 


PRINT AT 0,8; INK 5;"P AC -- MAN" 
PRINT) AD DIG NO Dn ro A 
PRINT AT 10,9; INK 6; FLASH 1;"CARGANDO DATAS" 
PRINT AT 12,7; INK 4; INVERSE 1; FLASH 1; "ESPERE UN MOMENTO. “ 
GO- SUB 7000 
SUB 1870 
PRINT RO;AT 0,8: FLASH 1;”PULSA UNA TECLA. " 
IF INKEY$="" THEN GO TO 190 
GO SUB 3000 


AORIOCIOIOOIOOIORIOIOIOIJoK 
* PROGRAMA PRINCIPAL x 
AR : 


VI=3 
V$=CHR$ 144+CHR$ 144+CHR$ 144 
PU=0 
PA=1 


SIAM 
* LECTURA DE LAS DATAS DE LA PANTALLA x* 
AS 


RESTORE 310 
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:LET AS=SCREENS (Y,X): PRINT AT Y,X;CHR$ 145: GO TO 712 
IF Ks="W" THEN IF SCREENS (Y,X+1)<>"+" THEN LET X=X+1: PRINT AT Y,X-1;" " 
: LET AS=SCREENS (Y,X): PRINT AT Y,X;CHR3$ 144: GO TO 712 
IF K$="0" THEN IF SCREENS (Y-1,X)<>"+" THEN LET Y=Y-1: PRINT AT Y+1,X;" " 
: LET A$=SCREEN$ (Y,X): PRINT AT Y,X;CHRS 146: GO TO 712 
IF K$="K" THEN IF SCREENS (Y+1,X)<>"+" THEN LET Y=Y+1: PRINT AT Y-1,X;" " 
: LET A$=SCREENS (Y,X): PRINT AT Y,X;CHR$ 147 
IF AS="." THEN LET PU=PU+10: IF CC<>»0 THEN LET CC=CC-1 


690 
700 
710 


712 
714 
715 
720 
730 
740 
750 
760 
770 
780 
785 
790 
800 
810 
815 
816 
817 
820 
830 
840 


IF A$="x" THEN LET PU=PU+50: LET CC=25xVI 
LET As="" 

IF INT (PU/PA)=3430 THEN GO TO 1170 

GO SUB 800 

GO SUB 870 

GO SUB 950 

IF ATTR (Y,X)<>7 THEN GO SUB 1030 
PRINT AT 21,25; INK 6;PU 

GO TO 680 

REM 

REM AMOS SOS alOlOlOO OOO look 

REM * MOVIMIENTO DEL MARCIANO 1 * 

REM MMS lalolalaloolojojolojoloiok 

REM 

IF CC<>0 AND S1=1 THEN LET S1=0: RETURN 
LET S1=1 

LET I1=SGN (X-X1) 

LET A1=SGN (Y-Y1) 


IF SCREENS (Y1,X1+11)<>"+" THEN LET X1=X1+I11: 


=SCREEN$ (Y1,X1): PRINT AT Y1,X1; INK 1:CHR$ 148 


850 


IF SCREENS (Y1+A1,X1)<>"+" THEN LET Y1=Y1+A1: 


=SCREENS (Y1,X1): PRINT AT Y1,X1; INK 1;CHR$ 148 


860 
865 
870 
880 
890 
895 
896 
897 
900 
910 
920 


RETURN 

REM 

IS 

REM * MOVIMIENTO DEL MARCIANO 2 x* 

REM AROSA JOJOIOIOJOJOK 

REM 

IF CC<>0 AND S2=1 THEN LET S2=0: RETURN 
LET S52=1 

LET 12=SGN (X-X2) 

LET A2=SGN (Y-Y2) 


IF SCREEN$ (Y2,X2+12)<>"+" THEN LET X2=X2+12: 


=SCREEN$ (Y2,X2): PRINT AT Y2,X2; INK 2;CHR$ 148 


930 


TF, SCREENS (Y2+A2,X2)<>"+" THEN LET Y2=Y2+A2: 


* =SCREEN$ (Y2,X2): PRINT AT Y2,X2; INK 2;CHBR$ 148 


940 
945 
950 
960 
970 
975 
976 
977 
980 
990 
1000 


RETURN 

REM 

REM ASS idad lalalala lalololok 

REM * MOVIMIENTO DEL MARCIANO 3 x 

REM ASSOOOOIOOSIOOSOlOSJOIO lll ok 

REM 

IF CC<>0 AND S3=1 THEN LET S3=0: RETURN 
LET S3=1 

LET I3=SGN (X-X3) 

LET A8=SGN (Y-Y3) 


IF SCREEN$ (Y3,X3+13)<>"+" THEN LET X3=X3+13: 


=SCREEN$ (Y3,X3): PRINT AT Y3,X3: INK 4;CHR$ 148 


1010 IF SCREENS (Y3+A3,X3)<>"+" THEN LET Y3=Y3+A3: 
=SCREEN$ (Y3,X3): PRINT AT Y3,X3; INK 4:CHR$ 148 
1020 RETURN 

1025 REM 


1080 REM Add Iaalololaloldlololalo jo 
1040 REM * PERDIDA DE UNA VIDA x 


1050 


REM ROO ORIOSIOMOIOIORaOICJook 
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PRINT AT Y1,X1-11;0$: LET Q$ 


PRINT AT Yi-A1,X1;Q8: LET Q$ 


PRINT AT Y2,X2-12;WS: LET W$ 


PRINT AT Y2-A2,X2;W$: LET W$ 


PRINT AT Y3,X3-I3;E$: LET E$ 


PRINT AT Y3-A3,X3;E$: LET E$ 


1055 REM 

1056 FOR I=0 TO 10 

1057 PRINT AT Y, X;CHR$ 144 

1058 BEEP .2,-10 

1059 PRINT AT Y,X;" " 

1060 BEEP .2,-20 

1061 NEXT I 

1062 PRINT AT Y1,X1;08 

1063 PRINT AT Y2,X2:WS 

1064 PRINT AT Y3,X3;E$ 

1065 PRINT AT 21,0; FLASH 1:*“ *XXMUERTOXx* b 
1070 FOR F=30 TO O STEP -1 : 
1080 BEEP .1,F 

1090 NEXT F 

1100 LET VI=YI-1 

1110 IF VI<O THEN GO TO 1750 

1120 LET V$=V8( TO VI) 


” 


1130 PRINT *O;AT 1,0; INK 7; PAPER 1; FLASH 1;" PULSA UNA TECLA 
1140 IF INKEYS$="" THEN GO TO 1140 
1150 INPUT "" 


1151 PRINT AT 21,0; INK 4;" - 
1180 GO TO 510 

1165 REM 

1170 REM Adalid olaaa lolololok 

1180 REM * TERMINACION DE UNA PANTALLA * 

1190 REM AMANGO OOOO lOIOIOIoIodJoK 

1195 REM 

1201 FOR I=1 TO 15 

1202 FOR J=0 TO 7 

1203 BORDER J 

1204 NEXT J 

1205 NEXT 1 

1206 BORDER O 

1207 CLS 

1208 LET PA=PA+1 

1210 LET B=31 

1220 LET AS$=CHR$ 16+CHBR$ 2+CHR$ 148+" "+CHR$ 18+CHR$ 4+CHR3 148+" "+CHR$ 16+CHBR$ 
3+CHR$ 148+" " 

1230 FOR F=26 TO 3 STEP -1 

1240 PRINT INK 1;AT 10,F;A$' 

1250 IF F<18 THEN PRINT AT 10,B;CHR$ 145+"  ": LET B=B-2 
1260 IF B<7 THEN LET A$=A$( TO LEN A$-4) 

1270 FOR X=1 TO 5 

1275 NEXT X 

1280 NEXT F 

1290 FOR F=3 TO 27 

1300 PRINT AT 10,F; INK 6;" "+CHR$ 144 

1310 BEEP .,005,30 

1320 NEXT F 

1330 FOR F=10 TO 15 

1340 PRINT AT F,28; INK 6;CHR$ 147;AT F-1,28;" " 
1350 BEEP .005,50 

1380 NEXT F 

1370 LET A=144 

1380 FOR F=1 TO 21 

1390 PRINT AT 15,28; INK 6;CHR$ A 

1400 LET A=A+1 

1410 IF A=148 THEN LET A=144 

1420 FOR X=1 TO 4 ' 

1430 NEXT X y 
1440 BEEP .05,-50+INT (RND*100) AY 0d E AT A 
1450 NEXT F 
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1460 PRINT AT 3,0;" Has conseguido comer los 306” 

1461 PRINT AT 4,0;"huevecillos de los celosos fan-" 

1462 PRINT AT 5,0;"tasmas de las oscuras catacumbas" 

1463 PRINT AT 8,0;"envejecidas por el monotono rras" 

1464 PRINT AT 7,0;"treo de sus omisas extremidades. * 

1470 PRINT AT 13,10; FLASH 1;"BONOS ";VIx*1000 

1480 PRINT AT 15,0; Puntuacion ”;PU;"+";VI*1000;"=";PU+VIx1000 
1490 PRINT AT 21,9; FLASH 1;"PULSA UNA TECLA" 
1500 IF INKEY$="" THEN GO TO 1500 

1510 FOR F=15 TO O STEP -1 

1520 PRINT AT F,28; INK 6;CHR$ 146;AT F+1,28;" 
1530 NEXT F 

1540 FOR F=28 TO O STEP -1 

1550 PRINT AT O,F; INK 6;CHR$ 145+" ” 

1560 NEXT F 

1570 PRINT AT 0,0;” ";AT 1,0; INK 6;CHR$ 144 
1590 LET A=7 

1595 LET B=3 

1600 PRINT AT 1,0;" " 

1810 FOR W=1 TO 2 

16820 FOR C=B TO A 


1630 FOR F=0 TO 30 

1640 PRINT AT C,F; INK 6;" "+CHR$ 144 
1650 NEXT F 

1660 PRINT AT C,31;" " 


1670 NEXT C 

1680 LET A=21 

1690 LET B=13 

1700 NEXT W 

1710 CLS 

1720 LET PU=PU+VI*1000 

1740 GO TO 260 

1745 REM ' 
1750 REM AMOO lalalololololololololaK 
1760 REM * FINAL DE LA PARTIDA *x 
1770 REM AMOO SOS NIOlO MIOS lOjalOlOIOlOlOlOK. 


1775 REM 

1780 CLS 

1790 PRINT AT 10,2;"Tu puntuacion ha sido= ";PU 

1800 PRINT *'" Lastima,parecias bueno.” 

1810 PRINT " No te preocupes, cuenta con mi compasion. " 


1820 PRINT $0; FLASH 1;"PULSA UNA TECLA PARA VER RECORDS" 
1830 LET K$=INKEY$ 
1849 IF K$="" THEN GO TO 1830 
9 1850 GO SUB 4000 

1880 GO TO 180 
1865 REM 
1870 REM AMMOSaSIOORSO OOO jol loja lalalala lalalala jala lalalala lalalala laialalialolaollololaik 
1880 REM * LECTURA DE LAS DATA CON LA DEFINICION DE LOS CARACTERES * 
1890 REM ARIJON RONO ROJO JOJONONOJOIOJORJOJOIOJONOLORIOOI JOINT: 
1895 REM y 
1900 RESTORE 1980 
1910 FOR F=97 TO 101 
1920 FOR C=0 TO 7 
1930 READ A 
1940 POKE USR (CHR$ F)+C,A  - 
1950 NEXT C 
1960 NEXT F 
1970 RETURN 

. 1971 REM 

211972 REM AMS IOIO RO 
1973 REM * DATAS CON LA DEFINICION DE LOS CARACTERES * 
1974 REM ARMS lO olaaa lala ollo lok 
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1975 
1980 
1990 
2000 
2010 
2020 
3000 
3010 
3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3250 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 

3370 
3380 
3390 
3400 
3410 
3420 
3430 
3440 
4000 
4010 
4020 
4030 
4040 
4045 
4050 
4060 
4070 
4080 
4090 
4100 
4110 


REM 
DATA 0,28,62,124,120,124,62, 28 
DATA 0,56,124,62,30,62,124,56 
DATA 0,34,119,127,127,62,28.0 
DATA 0,56,124,254,254,238,68,0 
DATA 56,124,214,254,238,254,170,170 
REM 
REM AMSSOIOOOIOIOIOIOIOJO OK 
REM * PRESENTACION x* 
REM AMOO IJSIOIOJOJOK 
REM 
CLS 
RESTORE 9000 
FOR 1=0 TO 14 
PRINT AT 1,5; 
READ A$ 
FOR J=1 TO LEN (A$) 
IF AS$(J)="1" THEN PRINT CHR$ (144); 
IF A$(J)="0" THEN PRINT " "; 
NEXT J 
NEXT 1 
FOR 1=0 TO 14 
PRINT AT 17,1;”.” 
PAUSE 4 
NEXT 1 
PRINT AT 17,14;". = 10 PUNTOS" 
FOR 1=0 TO 14 
PRINT AT 19,1:%x" 
PAUSE 7 
PRINT AT 19,1; " 
NEXT 1 
PRINT AT 19,14;"x* = 50 PUNTOS” 
FOR I=1 TO 150 
NEXT 1 
FOR 1=0 TO 14 
PRINT AT 17, 1;CHR$ 144 
PAUSE 7 
PRINT AT 17,15" " 


'NEXT 1 y 


PRINT AT 17,14;CHR$ 144;" = TU MISMO ” 

FOR 1=0 TO 14 ) 
PRINT AT 19, 1;CHR$ 148 
PAUSE 7 
PRINT AT 19,1;" " 

NEXT 1 

PRINT AT 19,14;CBR$ 148;" 

FOR I=1 TO 150 

NEXT 1 

GO SUB 4000 

RETURN 

REM 

REM AMOO OSO lalOlO lalola loiololok 

REM * TABLA DE RECORDS * 

REM AMOS JOIOIOIOIOIOIOJOK 

REM 

CLS 

PRINT INK 5;AT 0,8; "TABLA DE RECORDS" 

PRINTING 6 AT. 1 Uso poros iso ea se 

PRINT AT 3.0; “; : 

FOR 1=0 TO 27 = 
PRINT CHR$ 143; 

NEXT 1 

PRINT 


TU ENEMIGO” 
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4120 PRINT " “;¡CHR$ 143;TAB 29;CHR$ 143 

4130 PRINT “ 

4140 FOR 1=0 TO 27 

4150  PRINT CHR$ 143: 

4160 NEXT 1 

4170 PRINT 

4180 FOR I=1 TO 9 

4190. [PRINT" ";CHR$ 143: TAB 29;CHR$ 143 

4200 NEXT 1 

4210 PRINT " ”; 

4220 FOR 1=0 TO 27 

4230  PRINT CBR$ 143; 

4240 NEXT 1 

4250 LET NP=0 

4260 FOR I=1 TO 10 

4270 IF PU>P(1) THEN LET'NP=1 

4280 NEXT 1 

4290 IF NP=1 THEN LET P(10)=PU: LET N$(10,1)=CHR$ 255 

4300 FOR I=1 TO 10 

4310 FOR J=1 TO 1 

4320 IF P(1)>P(J) THEN LET AS=N$(1): LET A=P(1): LET N3(I)=N$(J): LET P(I 
)=P(J): LET N$(J)=A$: LET P(J)=A 

4330 NEXT J 

4340 NEXT 1 

4350 IF NP=0 THEN GO TO 4390 

4360 FOR I=1 TO 10 

4370. IF N$(I,1)=CHR$ 255 THEN LET N$(1)="-=--=-=-=========- “: LET NP=1 
4380 NEXT 1 Ñ 

4390 PRINT AT 4,4; FLASH 1; INK 1; PAPER 6;N3(1);" ... “;P(1) 
4400 FOR I=2 TO 10 

4410  PRINT INK 4;AT 4+1,4:N3(1);" ... "¡P(I) 

4420 NEXT 1 

4430 IF NP=0 THEN GO TO 4580 1 
4435 INK 4: IF NP=1 THEN FLASH 1: INK 6: PAPER 1 

4440 PRINT AT 17,11; FLASH 1; INK 5; "FELICIDADES" 

4450 PRINT AT 19,3;"TU PUNTUACION ES MUY BUENA” 

4460 PRINT AT 21,7; INK 4; "ESCRIBE TU NOMBRE. "; 

4470 LET NS(NP)=" “. LET X=4: LET LO=1: LET D$="" 
4480 LET Y=4: IF NP<>1 THEN LET Y=4+NP 

4490 PRINT AT Y,X; 


4500 PRINT ". ";CHR$ 8; 
. 4510 PAUSE 6: LET AS=INKEYS: IF AS="" THEN GO TO 4510 
4520 IF AS=CHR$ 12 AND LO<>1 THEN LET LO=LO-1: LET N$(NP,LO)=" ”:: PRINT CHR$ 8 
:" 2¡CBRS 8;CHR$ 8: 
“A 4530 IF A$=" “ THEN GO TO 4560 


4540 IF A$=CHR$ 13 THEN GO TO 4570 

4550 IF A$<"0" OR A$>"z" THEN GO TO 4510 

4580 PRINT A$;". "¡CHR$ 8;: LET NS$(NP,LO)=A$: LET LO=LO+1: IF LO<>15 THEN GO TO 
4510 

4570 PRINT AT Y, 4;N$(NP) 

4580 PRINT $0;” PULSA UNA TECLA PARA CONTINUAR" 
4590 PAUSE O 

4600 PAPER O: INK 7: FLASH O 

4610 RETURN 

4999 STOP 

7000 REM 

7010. REM MARS IO lojolaiolo dk 

7020 REM *x LECTURA DE LOS RECORDS * 

7030 REM aMSSIO SISSI lRjoIoloK 

7040 REM 

7050 RESTORE 8000 

7060 FOR I=1 TO 10 
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dl ASEOS, y 
LE TASAS 


, x 


ESE 
Lt! 
se 
E e 


ao SMS 
DER AMERa 
CINE ANANA 


se propone 


Como ejercicio al lector 
crear una rutina que nos permita redefinir las 


teclas de movimiento a gusto del usuario al 


principio del programa. 


Las teclas que tendremos que utilizar 
para mover nuestro quesito por la pantalla son 


las siguientes: 
— Q: Movimiento hacia la izquierda. 


— W: Movimiento hacia la derecha. 


— O: Movimiento hacia arriba. 
— K: Movimiento hacia abajo. 
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AEB E 


SPECTRUM en las cuatro direcciones de la 


, Da,» 
z ESE 5288 
: SRESE un 
7 30: o0>S$*0 
5 288 23 
-3 232388534 
Sl LAR QEO 
E SUL DRAS 
E A 
12 2RE00 
E 08 80 
JE 25 28523 
3 588 y 00 
== EEES 
5 RERERE=TO 
Y NPASSES 
== L- [7] 
SÍ E] 
z a] 
ES 5 ba] 
E SIS 
AS 
RE 


A =E + : 
sapo QA = 
de E 
1 2 
ñ 
o 
3 

11 

a de 

nl a HO: > « O o < € - -: _ =) A AS pa a 


” A OS 


1220 
1230 
1240 
1250 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2295 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2480 
24860 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2800 


NEXT J 
READ TOT 
IF TOT<>CHEK THEN GO TO 5000 
NEXT I 
HEM 
REM ASOMO JoK 
REM * * 
REM * DEMOSTRACION * 
REM *x * 
REM ASOMO ollo lalo IajoK 
REM 
CLS 
OVER 1 
FOR I=0 TO 7 
PAPER 1 
FOR J=0 TO 21 
PRINT AT J,1*3+2;" E 
NEXT J 
NEXT I 
OVER O 
PAUSE 50 
REM 
REM AMS OIJ IOlOJOJOIOK 


REM * SCROLL A LA IZQUIERDA * 
REM SIRIOS MISMO JjojojoK 
REM 
POKE 23300,1 : REM SCROLL A LA IZQUIERDA 
POKE 23301,7 : REM NUMERO DE LINEAS. DESDE LA 0 A LA 6 
POKE 2330217 : REM COLOR QUE APARECE EN LA PARTE DERECHA 
REM 
FOR I=0 TO 31 
RANDOMIZE USR 55000 
PAUSE 4 
NEXT 1 
PAUSE 50 
REM 
REM SMS ISO IOIOIOJOJOK 
REM * SCROLL-A LA DERECHA * 
REM SSA IOJOIOolOK 
REM 
POKE 23300,2 : REM SCROLL A LA DERECHA 
POKE 23301,12: REM NUMERO DE LINEAS. DESDE LA O A LA 9 
POKE 23302,7 : REM COLOR QUE APARECE EN LA PARTE IZQUIERDA 
REM 
FOR I=0 TO 31 
RANDOMIZE USR 55000 
PAUSE 4 
NEXT 1 
PAUSE 50 
REM 
REM SMS OJlojoK 
REM * SCROLL HACIA ARRIBA * 
REM SSA IOrOJOloK 
REM 
POKE 23300,3 : REM SCROLL HACIA ARRIBA 
POKE 23301,21: REM NUMERO DE LINEAS. DESDE LA O A LA 19 
POKE 23302,7 : REM COLOR QUE APARECE EN LA PARTE (INFERIOR 
REM 
FOR I=0 TO 10 
RANDOMIZE USR 55000 
PAUSE 4 
NEXT 1 
PAUSE 50 
REM 4 
REM SSA 
REM * SCROLL HACIA ABAJO * 
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yl > 
: 4 E 
> S EN x z 
e. IS SS 
4 ; 


: N : Ñ E ; 


y y 3 19 160 10 > 


S 
5 
3 
: 
> 
8 
8 
E 


E] 
3 
= 

3 

a] 
£ 

¡0] 
Lan) 
jo] 

[0 
jo) 

v 
- 

E 

(0) 
a 

e) 
o 
yo] 
sO 

¡0) 
0) 

YN 

(0) 
QQ 

[q] 

E 

5 

b 


Este programa es sólo de demostración 


para poder ver cómo funciona la rutina; el pro- 


TRUCOS Y RUTINAS BASICAS 


1580 ; 


1590 
1600 
1610 


1620 ; 


1630 


EQU 23302 


1640 ; 


1650 
1660 


1870 := 

¡= ESTE PROGRAMA ES TOTALMENTE REUBICABLE, = 
AUNQUE EL PROGRAMA SE REALIZO = 
A PARTIR DE LA DIRECCION 55000, EL USUA- = 
RIO PUEDE ELEGIR LA DIRECCION QUE MAS LE = 


1680 
1690 
1700 
1710 
1720 


1730 : 


1740 


;= POR ELLO, 


;= CONVENGA PARA SU PROGRAMA. 


, 1750 : 


1760 
1770 
1780 


ORG 55000 


1790 ; 


1800 
1810 
1820 
1830 
1840 


1850 : 


1860 
1870 


> OOO 
EE EEES 
pIootook PROGRAMA: PRINCIPAL *xXKKkXX 
y FRIO alolloRolok 
E ES 


* 


5 


1880 ; 


1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
a 2010 

2020 


2030 ; 


2040 
2050 
2080 
2070 
2080 


2090; 
2100 ; 


2110 
2120 
2130 
2140 


2150 ; 


2160 
2170 
2180 
2190 


, 

AS jolla loja ojo. 
¿Xx * 
3% SCROLL A LA IZQUIERDA *X 
pk k 
ES 


HL, 22528 
A, (NUM) 
C,A 

A, (ATTR) 


IZQ 


LIN-1IZ B,31 


CHR-IZ INC BL 


E, (HL) 
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SI 


5 SI 


5 SI 


; SI 


; SI 


p>Pao>E 


lo] 


mE 


; ALMACENAMOS LA DIRECCION DEL SCROLL 


1 


ES 1 VAMOS A * IZQ” 


ES 2 VAMOS A *DER” 


ES 3 VAMOS A, *ARR”: 


ES 4 VAMOS A *ABB” 


ES OTRO NUMERO VOLVEMOS AL BASIC 


AREA DE ATRIBUTOS 
NUMERO DE LINEAS A MOVER 
A 

COLOR DE LA LINEA VACIA 


NUMERO DE CHR POR LINEA 


BL +1 
CONTENIDO DE HL 


mon 


2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2380 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 


2450 ; 


2460 
2470 
2480 
2490 
2500 


2510 ; 


2520 


2530 ; 


2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 


2640 


2650 
2680 


, 


HL 
(HL),D 
HL 
CHR-1Z 
(BL),A 
HL 

e 

NZ, LIN-IZ 


3 RARO OOO RIO ROJO ORO OK: 


yk 


xk 


¿* SCROLL A LA DERECHA  * 


sk 


* 


ES 


2670 ; 


2680 
2690 
2700 
2710 
2720 
2730 


2740 ; 


2750 
2760 
2770 
2780 
2790 


2800 ; 


2810 
2820 


HL, 22527 
DE, 32 

A, (NUM) 
B,A 

CA 


HL, DE 
SUM=DE 


A, (ATTR) 


B, 31 


NZ,LIN-DE 


ETS 


¿Xx 


k 


¿* SCROLL HACIA ARRIBA x*x 


yk 


xk 


ES 


, 
, 


ARR 


SUM-AR 


x 


BL,O 
DE, 32 - 
A, (NUM) 
B,A 


HL, DE 
SUM-AR 


; HL 
; HL 


A 


mn, 
o 
- 
— 


= BL -1 
= CONTENIDO DE LA POSICION ANT. 
; HL = BL +1 


; SI NO HEMOS TERMINADO CONTINUAMOS 


; PONEMOS EL ATRIBUTO 

¡ HL = BL + 1 

; UNA LINEA MENOS. .C = C- 1 

3 CONTINUAMOS SI QUEDAN LINEAS 


; Y SI NO VOLVEMOS AL BASIC. 


HL = ZONA DE ATRIBUTOS - 1 
DE = NUMERO DE BYTES POR LINEA 
A= NUMERO DE LINEAS 
B=A 
C=A 
= BL + DE 
= B - 1! IF B<>0 THEN SUM-DE 
= DIRECCION DE LA ULTIMA LINEA 
A = ATRIBUTO A INTRODUCIR 
B = NUMERO DE CER POR LINEA - 1 
; HL = HL - 1 
E = LO QUE HAY EN HL 
¡HL = BL + 1 
; GUARDAMOS LO QUE HBABIA EN E 
¡; HL = HL - 1 


¡B=B - 1:IF B<>0 THEN CHR-DE 


+ PONEMOS EL ATRIBUTO 
; HL = HL - 1 


C=C-"-1 
IF C<>0 THEN LIN-DE 


; VOLVEMOS AL BASIC. 


 —Á 
DE = NUMERO DE CBR POR LINEA eri 

-A = NUMERO DE LINEAS A MOVER 
; HL = BL + DE 2 (l 4 
: B=B- 1:IF B<>0 THEN SUM-AR 


TRUCOS Y RUTINAS BASICAS 


2830 : HL = NUMERO DE BYTES A MOVER 
2840 ; 
2850 LD B,H 
2860 LD C,L : BC = HL. BC = NUMERO DE BYTES A MOVER 
2870 LD HL, 22560 ; HL = ORIGEN PARA LDIR 
2880 LD DE, 22528 5 DE = DESTINO PARA LDIR 
2890 LDIR ; LD (DE), (HL): BL=HL+1:DE=DE+1:BC=BC-1 
2900 ; 
2910 LD A, (ATTR) : A = ATRIBUTO A INTRODUCIR 
2920 LD B, 32 : ¡B = CARACTERES POR LINEA 
2930 ; 
2940 CHR-AR LD (DE), A ; PONEMOS EL ATRIBUTO 
2950 INC DE 5 DE = DE +1 
> 2960 DJNZ CHR-AR ; B=B- 1:1F B<>0 THEN CHR-ARR 
2970 ; 
2980 RET 1 ; VUELTA AL BASIC 
2990 ; 
3000 ; 
BOLO y AA RJ RR ak 
3020 ;* * 
3030 ;* SCROLL HACIA ABAJO x* 
3040 ;¡* / *k 
O IEEE EEES 
3060; 
3070 ; 
3080 ABB LD BL, O ; BL.=.0 
3090 LD DE, 32 ; DE = NUMERO DE CHR POR LINEA 
3100 LD A, (LIN) ; A = NUMERO DE LINEAS A MOVER 
3110 LD B.A ¡oB=A 50 
3120 ; 
3130 SU1-AB ADD BL, DE ; HL = BL + DE 
3140 DJNZ SU1-AB ; B=B- 1:1F B<>0 THEN SU1-AB 
3150 ; BL = NUMERO DE BYTES A MOVER 
3160 ; 
3170 LD B,H  B=B 
3180 LD C.L e GENIL, 0 
3190 ; BC = NUMERO DE BYTES A MOVER 
3200 PUSH BC ; GUARDAMOS BC EN EL STACK 
3210 ; 
3220 LD BL, 22528 ; HL = PRIMERA DIRECCION DE LOS ATTRIB. 
3230 LD B,A ; B = NUMERO DE LINEAS A MOVER 
3240 ; 
3250 SU2-AB ADD BL, DE ; HL = BL + DE 
Y 3260 DJNZ SU2-AB  B=B- 1:;1F B<>0 THEN SU2-AB 
3270 ; HL = DIRECCION DE-LA SEGUNDA LINEA 
3280 ; 
3290 PUSH BL : GUARDAMOS HL EN EL STACK 
3300 ADD BL, DE ; HL = BL + DE 
3310 EX DE, HL ; SWAP HL, DE 
3320 , ; DE = DIRECCION DE LA PRIMERA LINEA 
3330 POP HL - ; HL = DIRECCION DE LA SEGUNDA LINEA 
3340 POP BC ; BC = NUMERO DE BYTES A MOVER 
3350 LDDR ; LD (DE), (HL) : DE=DE-1:HL=HL-1:BC=BC-1 
3360 ; ' 
3370 LD A, (ATTR) ; JA = ATRIBUTO A INTRODUCIR 
3380 LD B,32 ; B = NUMERO DE CHR POR LINEA 
3390 LD DE, 22528 : DE = DIRECCION DONDE PONER ATRIBUTOS 
3400 : 
3410 CHR-AB LD (DE), A ; PONEMOS EL ATRIBUTO 
3420 INC DE ; DE = DE +1 
3430 DJNZ CHR-AB 5 B=B- 1:1F B<>0 THEN CHR-AB 
3440 ; 
3450 RET ; VUELTA AL BASIC 
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Inicialmente el programa ha sido loca- 
lizado en la dirección 55000, pero como es re- 
ubicable, el usuario puede colocarlo donde me- 
jor sirva a sus propósitos. 

Con esta rutina podremos hacer 
SCROLL: 


1. Ala izquierda. 
2. Ala derecha. 
3. Hacia arriba. 
4. Hacia abajo. 


Para decirle al programa en qué direc- 
ción queremos mover los atributos, sólo tene- 
mos que poner el tipo de movimiento en la po- 
sición de memoria 23300. Si en ésta colocamos 
un número que no sea ni 1, ni 2, ni 3, ni 4, el 
programa volverá al BASIC sin hacer nada. 

En la posición 23301 debemos poner el 
número de líneas que queremos que el pro- 
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grama «SCROlLee». Este número nunca puede 
ser mayor de 24. 

Como cada vez que se realiza un 
SCROLL, una línea o columna de la pantalla 
pierde los atributos que tenía, tenemos que 
poner en la posición 23302 el atributo que que- 
remos que tenga la línea o columna que se va 
quedando vacía. Este número ha de estar com- 
prendido entre 0 y 255. Los tres primeros BITs 
nos dirán el color de la tinta. Los tres siguien- 
tes el color del papel. El BIT (el número 6) dirá 
si queremos brillo (1) o no (0). Por fin, el últi- 
mo BIT nos dice si queremos FLASH (1) 0 no 


(0). 

Una vez que se han POKEado los valo- 
res necesarios en todas estas direcciones, sólo 
hay que hacer: 


RANDOMIZE USR 55000 
para que la rutina funcione. 


EL TALLER DEL HARDWARE 


2 Conexiones en paralelo 


DEMÁS de las conexiones 
de tipo serie presentadas en 
los últimos tomos, es posible 
- Conectar periféricos en 
modo paralelo utilizando la 
tarjeta de ampliación de 
puertos descrita en los pri- 
meros tomos. Existen, sin 
embargo, varios tipos de conexión utilizados 
en periféricos cuando la distancia de conexión 
es corta y que es interesante considerar. 


2 Conexión Centronics 


LADO CONTROL MACIZO el 
:19 1 — MUESTREO (STROBE) 
A 20 2 —DATOS 0 
21 3—DATOS 1 
MASA 22 4 DATOS 2 
DE 93 5-—DATOS 3 
RETORNO 24 6 —DATOS 4 
DE 25 7 DATOS 5 
E 2 8 —DATOS 6 
2 9 —DATOS 7 
28 10 > ACEPTACION (ACIC) 
29 11 > OCUPADO (BUSY) 
30 12 > FIN PAPEL (PE) 
(PRIME) INICIALIZAR — 31 13 > ACTIVO (SLCT) 
(FAULT) AVERIA — 32 14— MASA 
3 15 
4 16 MASA 
35 1 
36 18 +5 
Fig. 1. Conector tipo Centronics. 


Está diseñada para ser empleada prin- 
cipalmente en conexión de impresoras, pero 
es posible la adaptación de cualquier otro dis- 
positivo utilizando la circuitería y protocolo 
ideados para transferencia en paralelo pro- 
pios de la impresora. Utiliza 8 hilos de datos, 
y tres básicos de control: ocupado, aceptación 
y muestreo. En la figura se muestra la secuen- 
cia de señales necesaria para la transferencia. 
La comunicación es unidireccional, si bien en 
algunas realizaciones comerciales puede em- 
plearse de modo bidireccional al poder de- 
sactivarse los circuitos de salida, de tipo Tris- 
tate. Los niveles de las señales en el conector 
son TTL, de donde se deduce la limitación de 
distancia a unos pocos metros, teniendo siem- 
pre en cuenta la adaptación de impedancias 
en el extremo receptor. 

La interfaz paralelo de impresora del 
IBM-PC implementa el protocolo Centronics, 
aunque posee otros hilos para aplicaciones 
complementarias. 

El conector es de 36 pines de tipo es- 
pecial de borde. Usualmente el equipo recep- 
tor tiene el conector hembra, aunque median- 
te el cable de conexión se puede adaptar cual- 
quier configuración. Por ejemplo, las impreso- 
ras del IBM-PC se conectan a través de un ca- 
ble que tiene por un lado conexión a la tarjeta 
de adaptador paralelo, con conector de 25 pi- 
nes de tipo Cannon hembra y por el lado de 
la impresora conector Centronics macho. La 
realidad es que son necesarios solamente 11 
pines para el intercambio de señales, por lo 
que existen algunos equipos con conector re- 
ducido. 

La velocidad de transferencia es del or- 
den de 10.000 caracteres por segundo como 
máximo, por las necesidades del protocolo. 
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Fig. 2. Señales de la conexión Centronics. 


La secuencia de señales para la trans- 
ferencia de datos a través de una conexión 
Centronics típica debe ser, como se indica en 
la figura: 


— El controlador observa la señal de 
aceptación o reconocimiento y si está en nivel 
alto presenta los datos en el bus. 


SABE TERA ER ERA ADA 

— Acto seguido el receptor pone la in- 
dicación de ocupado, mediante la subida de 
la línea y por la duración de la transferencia 
al registro intermedio de almacenamiento. 

— Los datos pueden ser leídos por el 
receptor durante el pulso de validación. 

— Al terminar la transferencia se qui- 
tará la señal de ocupado. 

— La señal de aceptación pasará a ni- 
vel 0, por lo que el controlador deduce el tiem- 
po durante el cual deberá esperar a que esté 
de nuevo disponible para enviar otro carácter. 


Se puede montar una conexión de tipo 
Centronics a partir de una tarjeta de amplia- 
ción de puertos, o bien mediante la conexión 
paralelo de que disponen algunos equipos 
como el Commodore. 

Un circuito típico de interfaz de tipo 
Centronics es como el que se muestra en la fi- 
gura: 


' 7ALS374 
si Do 3 2 é 
RAN 4 ETA IA 
D2 ISR TARA |] 
D3 8 CREAN AR 08 
DA E AA 140 E 
D5 14 ERICO A En 
D6 Y ¿OCDE LA 1%, 
DI 18 AS A Ma] 
SELWÓ 11 > O O +5 — 
7 1K 
7415174 sb E 
DO 3 2 » 
| ALA IMPRESORA 7 
| 
TALS174 
pe 14 A 6 
BUSY 2 A 
19 
SELRO O 


Fig. 3. Circuito para interfaz Centronics. 
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EL TALLER DEL HARDWARE +. 


E TEEE-488 


Este tipo de conexión tiene su origen en 
el HP-IB, diseñado por Hewlett-Packard para 
comunicar diferentes instrumentos de medida 
con un ordenador. A veces se le denomina 
GP-IB, por General Purpose Interface Bus. Ac- 
tualmente está muy difundido entre los equi- 
pos de instrumentos avanzados el disponer de 
forma estándar u opcional de la conexión 
IEEE-488. Requiere inteligencia en todos los 
equipos conectados a este bus. El protocolo de 
comunicación es muy complejo, por lo que da- 
remos solamente unas indicaciones de sus po- 
sibilidades. Existe un documento formal del 
IEEE que hace la descripción completa. La 
gran difusión ha permitido el desarrollo de 
circuitos integrados que implementan el pro- 
tocolo fabricados por Intel, Motorola y Texas. 
Por ejemplo, el circuito integrado Intel 82914 
realiza todas las funciones de conexión al bus 
IEEE-488 como locutor u oyente (Talker/Liste- 
ner), permitiendo el diseño simplificado de la 
conexión de un instrumento basado en micro- 
procesador al bus, Las funciones de controla- 
dor pueden realizarse mediante el circuito In- 
tel 8292, mientras que las de nivel físico pue- 
den satisfacerse con el circuito Intel 8293. Con 
aste conjunto de circuitos puede montarse la 
conexión completa para acceso directo a me- 
moria de los datos transmitidos y recibidos a 
través del bus. 


9 
3 
1 
6 
E 
4 
3 
2 
1 


Fig. 4. Conectores IEEE-488. 
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Este tipo de conexión ha sido también 
aceptado como norma de la IEC con el núme- 
ro 625-1, permitiendo un tipo diferente de co- 
nector, por lo que existen realmente dos nor- 
mas en cuanto al conector externo se refiere. 

Los datos son transmitidos por el bus en 
código ASCII de siete bits, pudiendo emplear- 
se el octavo como de paridad. 


La conexión entre los periféricos es en 
forma de bus, pudiendo tener una distancia 
entre extremos de 20 metros. El medio físico 
es un cable plano de 24 hilos con conectores 
especialmente diseñados para tener un extre- 
mo macho y otro hembra. A la salida del con- 
trolador los diferentes equipos pueden conec- 
tarse en cascada del mismo conector. Las se- 
ñales deben cumplir niveles compatibles con 
TTL: O a 0,8 es nivel bajo o 0 y >2,5 voltios es 
nivel alto o 1. Todas las señales de control son 
activas en nivel bajo. 


Las señales poseen la siguiente denomi- 
nación: 

— DIO1-DIO8 - Bus de datos. Bidirec- 
cional. : 

— DAV - Dato disponible. Es activada 
por el dispositivo que está controlando el bus 
en ese momento para indicar que los datos 
permanecen estables. 

— NRFD - No preparado para datos. La 
activa el receptor para indicar que no está en 
disposición de recibir más datos por el mo- 
mento. 

— NDAC - Dato no aceptado. Es activa- 
da por el receptor para indicar que los datos 
deben mantenerse en el bus, pues todavía no 
han sido almacenados. 

— ATN - Atención. Señal activada por 
el dispositivo que hace de controlador para in- 
dicar a los demás que hay un mensaje en el 
bus para todos ellos. 

— IFC - Limpiar la interfaz. Sirve para 
poner a todos los dispositivos en condiciones 
iniciales. 

— SRO - Petición de servicio. Es utiliza- 
da por los equipos no controladores para indi- 
car la solicitud de servicio por parte del con- 
trolador. 

— REN - Activar control remoto, Se em- 
plea para desactivar las funciones locales que 
pudiera tener el dispositivo direccionado, 
cómo, por ejemplo, el panel frontal de mandos. 

— EOI - Fin o identificación. Si el que lo 
utiliza es el controlador, indica a los dispositi- 
vos que han pedido servicio que se identifi- 
quen, Si el que lo utiliza es un dispositivo lo- 


cutor, significa que termina la transmisión de 
un bloque de datos. 


Las transferencias se realizan con pro- 
tocolo asíncrono, pero por los tiempos mínimos 
asignados a las señales resulta una velocidad 
máxima de transferencia del orden de 1 Me- 
gabyte por segundo. En todo momento debe 
haber un controlador del bus, que puede ser 
cualquiera de los equipos conectados. Cada 
dispositivo está identificado mediante una di- 
rección, que puede ser de ó 10 bits, según 
se use el modo normal o el extendido. Existe 
doble juego de direcciones para dos tipos de 
función existente: locutor u oyente, 

Los equipos pueden poseer diferentes 
posibilidades de operación, que deben ser de- 
finidas cuando se configura y que afectan a 
cómo se comportará en el seguimiento del 
protocolo. Podemos distinguir las siguientes 
posibilidades de operación: 


— Controlador. Realiza las funciones de 
control del bus: autorización de peticiones de 
comunicación entre estaciones y envío de ór- 
denes de activación y desactivación de dispo- 
sitivos. Debe haber por lo menos un dispositi- 
vo que actúe de controlador. Puede efectuar 
cambios sobre el estado de los otros disposi- 
tivos conectados. 

— Locutor. Tiene la posibilidad de 
transmitir información a otros dispositivos del 
bus, cuando le sea autorizado por el controla- 
dor. Para poder ser seleccionado dispone de 
una dirección única, que al aparecer en el bus 
activa los circuitos de recepción. 

— Oyente. Tiene la posibilidad de reci- 
bir mensajes del bus, cuando sea autorizado 
por el controlador. Cada dispositivo que pue- 
da actuar como oyente dispondrá de una di- 
rección única que le permita distinguirlo de 
los demás, 


Además, existen otras funciones dentro 
del protocolo: 


— Control sobre envío (SH). Es una fun- 
ción adicional a la de locutor y que capacita 
para controlar la recepción por parte de los 
oyentes del mensaje transmitido. Es una fun- 
ción necesaria para los dispositivos que nece- 
siten controlar la duración del envío desde el 
transmisor. 

— Control sobre recepción (AH). Capa- 
cita para el control de la señal de aceptación, 
para permitir la sincronización con el locutor. 
Indica la posibilidad por parte del dispositivo 
del control de la señal NRFD y permitir el re- 
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traso de la transferencia de un dato por no ha- 
ber podido aceptarlo o almacenarlo. 

— Petición de servicio (SR). Capacita 
para solicitar el uso del bus de forma asíncro- 
na, mediante la señal SRQ. La señal se man- 
tendrá hasta que el servicio haya sido satis- 
fecho. 

— Sondeo en paralelo (PP). Permite a 
un dispositivo mostrar un bit de estado al con- 
trolador sin que se haya seleccionado como lo- 
cutor. Permite el sondeo rápido de posibles 
solicitantes del bus, con una sola instrucción. 
Es posible disponerlo en 8 dispositivos simul- 
táneamente. ¿ ; 

— Inicialización específica (DC). Si se 
dispone de esta función puede activarse al 
dispositivo a sus condiciones iniciales de for- 
ma individual o por grupos. 

— Disparo de dispositivos (DT). Permi- 
te la puesta en marcha de funciones específi- 
cas de un dispositivo, de forma individual o 
por grupos. 

— Control remoto o local (RL). Median- 
te esta función puede controlarse la activación 
de funciones de forma local o solamente remota. 


LOCUTOR — OYENTES 


NDAC 


CONTROLADOR SRQ 
SONDEO PARALELO 


DATOS (IDY) 


DESACTIVACIÓN 


SRQ 


y AAA E a Y A 
El pa 


Fig. 5. IEEE-488 secuencia de intercambio de señ./es. 


La secuencia normal de comunicación 
puede representarse con la figura con la des- 
cripción siguiente: 

Para solicitud de utilización del bus: 


— El dispositivo que quiere comunicar, 
activa la señal SRQ. 


EL TALLER DEL HARDWARE 


— El controlador busca el origen de la 
petición de dos formas posibles: en paralelo o 
en serie. En paralelo: el controlador activa la 
señal IDY y de los 8 posibles dispositivos el 
que solicitó pone a cero su bit correspondien- 
te en el bus de datos. El controlador detecta 
el más prioritario, inhibe a los demás y activa 
a los oyentes y al locutor de la solicitud, A1 des- 
activar la señal ATN el locutor comienza la 
transmisión. En serie: el controlador responde 
a la petición con la secuencia: UNL (inhibir a 
los oyentes), SPE (comienzo de encuesta se- 
rie), MTA¡ (dirección de locutor posible), STB 
(estado del locutor encuestado). Cuando al 
responder uno de los locutores posibles indi- 
ca en su estado que solicitó servicio, se acaba 
la encuesta con SPD. El locutor recibirá con- 
trol para enviar lo que desee. 

— Se pasa a fase de envío de caracte- 
res. 


CONTROL + HABLAR + ESCUCHAR 


REN ATN NDAC DAV 


EOI 


Para envío de un carácter: 


— El dispositivo locutor observa que el 
bus no está en uso. 


— Coloca la información en el bus. 

— Activa la señal DAV (dato disponi- 
ble). 

— Los oyentes activan su señal RFD 
para indicar que no admiten más datos. 

— Cuando han leído el octeto del bus, 
activan la señal DAC. 


— Según el tipo de operación, el locu- 
tor observa DAC y al detectar que todos han 
aceptado, retira su señal DAV. 


— Al detectarlo los oyentes reactivan 
su señal RFD, indicando que aceptan más da- 
tos. Solamente cuando todos los oyentes han 
aceptado, el locutor puede enviar el siguiénte 
dato. 


DIO1-8 


SRQ IFC NRFI 


DATOS 


CONTROL 
DE TRANSFERENCIA 


CONTROL DE 
INTERFAZ 


Fig. 6. Esquema general de conexiones. 


La secuencia seguida para la transmi- 
sión de los mensajes cumple las condiciones 
del protocolo descrito. Además, las diferentes 
coniiguraciones de las señales existentes es- 
pecifican diferentes tipos de mensajes. Los 
mensajes pueden estar constituidos por una o 
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más líneas. Se indicán algunos ejemplos de 
mensajes para dar idea de la riqueza de posi- 
bilidades y también de la complejidad del so- 
porte de este tipo de conexión. En cada men- 
saje individual las diferentes líneas de la in- 
terfaz deberán mantener los niveles corres- 


PR RO A 


pondientes a la señal activa. Los diferentes ti- 
pos de mensajes se dividen en varios grupos 
de comportamiento bastante homogéneo. 

Grupo de mandatos universales: deben 
poder ser ejecutados por todos los dispositi- 
vOS: 


— Inicializar dispositivo (DCL). 

— Bloqueo local (LL). 

— Desactivar sondeo paralelo (PPU). 
— Comienzo de sondeo serie (SPE). 
— Fin de sondeo serie (SPD). 

— Identificación (IDY). 

— Inicializará la interconexión (IFC). 
— Activar control remoto (REN). 


Grupo de mandatos selectivos: sola- 
mente podrán ser ejecutados por aquellos dis- 
positivos preparados para ello: 


— Pasar a local (GTL). 

— Activar sondeo paralelo (PPC). 

— Inicializar los dispositivos seleccio- 
nados (SDC). 


Control del direccionamiento: 


— Envío de la propia dirección de 
oyente (MLA). 

— Desactivar escucha (UNL). Mediante 
el envío de la configuración 11111, se desacti- 
varán los oyentes seleccionados hasta ese mo- 
mento. 
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— Envío de dirección de locutor 
(MTA). 
— Desactivar locutor (UNT). 


Grupo de mensajes secundarios: 


— Dirección secundaria (MSA). 

— Validación de sondeo en paralelo 
(PPE). 

— Desactivación de sondeo en parale- 
lo (PPD). 


Grupo de mensajes de estado, para que 
los dispositivos indiquen su estado interno: 


— Terminación (END). 

— Estado (STB). 

— Petición de servicio (SRQ). 

— Respuesta de sondeo en paralelo 
(PPRi). 


Grupo de mensajes de manipulación de 
datos: 


— Datos aceptados (DAC). 
— Dato válido (DAV). 
— Preparado para recibir datos (RFD). 


Para el IBM-PC existe una tarjeta para 
realizar conexiones IEEE-488 y el correspon- 
diente programa de soporte de esta conexión 
desde cualquier lenguaje. 


APRENDER CON EL ORDENADOR 


MATEMATICAS 


Introducción a la topología 


IN duda alguna, la topología 
forma uno de los pilares fun- 
damentales en que se basan 
todas las matemáticas con- 
temporáneas; actualmente 
es difícil imaginar el análisis 
' o el cálculo infinitesimal sin 
la topología. Esta estudia 
fundamentalmente las figuras y sus transfor- 
maciones en los espacios métricos; ¿y qué es 
un espacio métrico?; pues es un espacio en el 
que se ha definido una «distancia», hay que te- 
ner cuidado con este nombre, ya que aunque 
habitualmente la distancia que define un es- 
pacio métrico coincide con el concepto de dis- 
tancia en la vida real, en otros muchos casos 
es así e incluso resulta imposible hacerse una 
idea intuitiva de lo que pueden significar. El 
concepto de distancia es muy importante en 
topología, ya que de él dependen los resulta- 
dos de los teoremas posteriores. Una es una 
relación que tiene que cumplir los siguientes 
apartados: 


1. Tiene que ser aplicación, y a cada 
par de elementos del espacio le corresponde- 
rá un número real y sólo uno; por ejemplo, en 
la vida real la distancia habitual entre Madrid 
y Guadalajara es de 50 km.; este 50 es el nú- 
mero que asignamos a esa distancia, claro está 
que si vas por otro camino la distancia puede 
ser mayor, por ejemplo, si pasamos por Zamo- 
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ra antes de ir a Guadalajara, pero no importa, 
puesto que tomamos siempre la misma distan- 
cia independientemente del camino que se 
tome. 

2. A(x,y)=0 si y sólo si x=y; que en cas- 
tellano significa, a saber: que si la distancia de 
un punto a otro es cero, los puntos coinciden, 
o lo que es lo mismo, si dos puntos coinciden, 
su distancia es cero; claro, la distancia de Ma- 
drid a Madrid son cero kilómetros. 

3. A(x,y)=d(y,X); O sea, que la distan- 
cia entre Madrid y Barcelona es siempre la 
misma que desde Barcelona a Madrid. 

4.  d(x,y)<=d(x,z)+d(y,z); claro, la dis- 
tancia entre dos puntos es igual o menor que 
la distancia entre el primer punto y otro inter- 
medio y éste y el segundo punto, o sea, que si 
quiero tardar más en recorrer la distancia de 
Madrid a Barcelona lo mejor que puedo hacer 
es dar un rodeo y pasar por Valencia. 


Con estos axiomas, el último no lo es, se 
definen las distancias y a partir de ellas todos 
los conceptos de la topología. 

Pero no os desaniméis, la topología es- 
tudia también cosas más entretenidas como 
demostrar que una pelota de fútbol no se pue- 
de transformar en un donuts, pues el donuts 
tiene un agujero. También que si vas vestido 
con chaleco y chaqueta puedes quitarte el 
chaleco sin necesidad de quitarte la chaque- 
ta, lo que demuestra que a efectos topológicos 
el chaleco está tan fuera de la chaqueta como 
los elefantes del zoo. 

El programa siguiente os servirá de 
ayuda para comprender el importantísimo con- 
cepto de distancia y así introducirnos poco a 
poco en el fascinante mundo de la topología. 


10 REM XXEARRRAERA LAA A RELE NARA FED ADA 


20 REM x 

3O REM xXx INTRODUCCION ' 

40 REM *k A LA * 

50 REM x TOPOLOGIA x 

60 REM x s ES 

7O REM KEXARERRRRA RIERA RA RAMAL AAA 

80 CcLs 

90 PRINT 

100 PRINT *” NOCION DE DISTANCIA" 
MO PRINT  AA 24 
120 PRINT 

130 PRINT 

140 PRINT " DEFINICION: ” 

1350 PRINT "=== he 

160 PRINT "Se denomina distancia d, *"; 


PRINT "definida sobre E, a toda” 
PRINT "aplicacion de ExE en R+, "s 
PRINT "tal que a la pareja de” 
PRINT "numeros x,y pertenecientes”; 
PRINT " a E, le asocia el numero " 
PRINT "real no negativo d(x,y), ”; 
PRINT "que verifique las condi-" 
PRINT "ciones siguientes:” 


PRINT 

PRINT "1) d(x,y)=0 si y solo si x=y” 

PRINT " Axioma de separacion”:PRINT 

PRINT "2) d(x,y)=d(y,x) para todo x,y de E" 
PRINT " Axioma de la simetria":PRINT 

PRINT "3) d(x,y)<=d(x,z)+d(2,y) para todo x,y,z de E” 
PRINT-" Desigualdad triangular” 

PRINT ¡ 

PRINT "Pulsa una tecla..." 

x$=INKEYS 

1F x8="" THEN BOTO 340 

CLS 

PRINT 

PRINT 


PRINT "Ahora veras una demostracion"; 
PRINT " grafica de los axiomas ” 
PRINT "anteriores. "; 

PRINT "Para ello pulsa un numero” 
PRINT "que se corresponda con *; 


'PRINT "el del axioma.” 


PRINT 

PRINT "1.- Axioma de separacion” 
PRINT 

PRINT "2.- Axioma de simetria" 
PRINT 

PRINT "3.- Desigualdad triangular" 
PRINT 

PRINT "4.- Acabar" 

PRINT 

PRINT "Dime un numero del 1 al 4” 
x$=INKEYS 


1F x9$="" THEN GOTO 550 

1F VAL (x$)<1 OR VAL (x$)>4 THEN PRINT "Por favor, no te equivoques”: G04o 540 
ON VAL (x$) GOSUB 640,870,1190 

IF VAL (x$)<>4 THEN GOTO 360 

> 


REM FINAL DEL PROGRAMA 


END Z 

REM ERRRENARERERA RRA AA RARA 
REM £ Axioma de separacion 1 
REM RERAEXERANA AER NARA 
>, 


CLsS 

LOCATE 20,10 

PRINT "x” 

LOCATE 20,11 

PRINT ",” 

LOCATE 20,12 

PRINT "y" 

PRINT 

PRINT 

PRINT 

PRINT "Sí los puntos x e y coinciden ";. 
PRINT "entonces la distancia que les ” 
PRINT "separa es cero” 

PRINT 

PRINT 
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APRENDER CON EL ORDENADOR 


830 PRINT "Pulsa una tecla...” 
840 x$=INKEYS 

850 IF x$="" THEN GOTO 840 

860 RETURN 

B70 REM OOOO OOOO IO 
880 REM K AXIOMA DE SIMETRIA * 
890 REM EREFANIAAIA AE RARA AREA 
900 * 

910 CLS 

920 LOCATE 20,10 

930 PRINT "x” 

940 LOCATE 20,11 

950 PRINT "." 

960 LOCATE 20,12 


970 PRINT " —======--- >" 
980 LOCATE 20,13 

990 PRINT "  d(x,y)" 
1000 LOCATE 20,9 

1010 PRINT " <-=--------" 
1020  LOCATE 20,8 


1030 PRINT d(y,x)" 
1040 LOCATE 32,10 
1050 PRINT "y” 

1060 LOCATE 32,11 

1070 PRINT *",” 

1080 LOCATE 1,15 


1090 PRINT "La distancia entre x e y "; 
1100 PRINT "es la misma que la distan-" 


1110 PRINT "cia de y a Xx, es decir "; 


1120 PRINT "no importa el sentido en que” 


1130 PRINT "se tome." 

1140 LOCATE 1,20 

1150 PRINT "Pulsa una tecla...” 
1160 x8=INKEYS 

1170 IF x$="" THEN GDTO 1160 
1180 RETURN 


1190 REM EREXAREXILANIAA LR AAARERRAA. 


1200 REM *£ desigualdad triangular * 
1210 REM EREXAAXRRRA CERA AE RARA RANAS 


1220 

1230 CLS 

1240 LOCATE 10,10 

1250 PRINT "x y" 


1260 LOCATE 10,9 

1270 PRINT "  d(x,y)" 
1280 LOCATE 10,11 

1290 PRINT ”. .” 
1300 LOCATE 15,17 
1310 PRINT ”.* 

1320 LOCATE 15,18 
1330 PRINT "z" 

1340 LOCATE 20,14 

1350 PRINT "d(z,y)" 
1360 LOCATE 4,14 

1370 PRINT "d(x,z2)" 
1380 MOVE 75,225 

1390 DRAWR 40,-90 
1400 DRAWR 40,90 

1410 DRAWR -80,0 

1420 LOCATE 1,20 


1430 PRINT "En la figura se aprecia"; 


1440 PRINT * perfectamente que la" 


1450 PRINT "distancia entre el punto ": 


1460 PRINT "x y el y es menor tomada ” 
1470 PRINT "directamente que pasando 


1480 PRINT "por el punto z." 
1490 x$=INKEYS 

1500 1F x8$="" THEN GOTO 1490 
1510 RETURN 


Este programa muestra los axiomas fun- 
damentales del concepto de distancia; el mis- 
mo explica cómo funciona, así que obviaremos 
la explicación dejando al sagaz lector descu- 
brirlo, 

El programa funciona sin cambios en 
ordenadores AMSTRAD, en SPECTRUM cam- 
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. 
3 


biar la instrucción LOCATE por PRINT AT, y 
quitar todos los puntos y comas del final de las 
sentencias PRINT. En compatibles IBM, cam- 
biar las variables de LOCATE (x,y) por LOCA- 
TE (y,x). 

En COMMODORE cambiar las líneas 
que ponga: 


-340 x$=inkey$ 
350 if x$=«» then goto 350 


por la siguiente: 
340 get x$ 


También cambiar CLS por PRINT 
CHR$(147) 


NATURALEZA 
Y TECNOLOGIA 


Juego de la vida 


El juego de la vida, también conocido 
como juego de vida, consiste en el estudio del 
comportamiento de unos entes llamados célu- 
las, y su interacción con las circundantes. 

Sus reglas son sencillas, en un espacio 
llamado universo, donde las células viven, se 
considera una célula y su entorno formado por 
las ocho adyacentes; estas células pueden te- 
ner dos estados: vivas y muertas; el juego con- 


COLMENA HOGAZA CHARCA 
BARCAZA BOTE BARCO 
Fig. 1. 


A pesar de su aparente simplicidad, el 
juego de la vida tiene innumerables aplicacio- 


ALTA 


siste en determinar el estado de cada una de 
ellas en función de las que las rodean, para lo 
cual se aplican solamente tres reglas: 


1. Si una célula está rodeada por una 
célula o menos, muere por aislamiento; si está 
rodeada por cuatro o más, entonces muere por 
asfixia. 

2. Si'tiene dos o tres rodeándola, en- 
tonces la célula conserva el estado en que es- 
taba, bien muerta o viva. 

3. Si está rodeada por tres células, en- 
tonces si la célula estaba muerta, nace una 
nueva. ta 

Con estas tres reglas tan sencillas se 
calculan las generaciones que consisten en un 
«golpe de tiempo» en el que se calculan los es- 
tados celulares para todas y cada una de las 
células existentes, sin que su nuevo estado 
afecte el estado anterior. 

De la configuración inicial de las célu- 
las dependerá su desarrollo posterior; de esta 
forma encontramos configuraciones que son 
estables, que varían entre dos estados desli- 
zadores que cada cierto tiempo se mueven 
por el universo, cañones que producen «balas» 
que se mueven por el universo, etc. 


TINA BLOQUE SERPIENTE 
JO 
BARCAZA BOTE BARCO 
LARGA LARGO LARGO 


Las formas estables más corrientes. 


nes científicas y técnicas, en biología, botáni- 
ca, ingeniería, y en otras muchas disciplinas. 


Fig. 2. El «deslizador». 
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APRENDER CON EL ORDENADOR 


10 REM ERESFERAARRER ARA LE RENAL NA 
20 REM x* x 
3O REM Xx JUEGO DE LA VIDA * 
"40 REM £ x 
50 REM EBRAERARRA EA REAE RENA RADAR 
60 FILA=0:1 COLUMNA=O 

70 NG=0:F=0:1C=0 

80 REM DECLARACION MATRICES 

$0 DIM CELUS$S(10,10),CELU14 (10,10) 


100 * 

110 REM PROGRAMA PRINCIPAL 

120 * : 

130 CLS 

140 LOCATE 10,10 

150 PRINT "JUEGO DE LA VIDA” 


160 GOSUB 430:” LEER DATOS 
170 GOSUB 8001” IMPRIMIR CELULAS 
3 180 LOCATE 1,23 

. 190 PRINT "PULSA UNA TECLA" 
200 X$=INKEYS$: 1F X$="" THEN GOTO 200 
210 LOCATE 1,23 
220 PRINT " i 

. 


240 REM BUCLE PRINCIPAL 
, 


260 BOSUB 1010:” CALCULO 

270 GOSUB 8001” IMPRIMIR CELULAS 

280 LOCATE 1,20 

290 PRINT "PULSA UNA TECLA” 

300 PRINT "PARA TERMINAR PULSA ”N”* 

310 X$=INKEYS: 1F X$="" THEN GOTO 310 
320 LOCATE 1,20 

330 PRINT " Y 

340 PRINT " = 
350 1F X$<>"N" AND X$<>"n" THEN GOTO 240 


370 REM FIN DEL PROGRAMA 
> 


390 CLS 

400 END 

B1LO * EERERAARAEREREA AE RAR KERNEL MEZAR 

420 * RKEREERRERALANIAA ARA RE LA NARARRAR 

430 REM ERAEAARAAARRA AREA RERILANA RR , 


440 REM k LEER DATOS * 
450 REM RREXARRRARERA REE EXARILARARA 
460 CLS 


470 LOCATE 10,1 

480 PRINT "INTRODUCE LAS CELULAS” 
490 LOCATE 1,20 

500 PRINT "*x* LAS PONE” 

510 PRINT "ESPACIO LAS QUITA" 
520 PRINT "*F” PARA TERMINAR" 
530 FOR 1=1 TO 10 


540 FOR J=1 TO 10 
l 550 CELUS(1,J)=" " 
560 NEXT J 
F 570 NEXT 1 
| 580 F=1:C=1 
.. 590 REM COMIENZA LA LECTURA 


600 LOCATE 35+C,7+F 

610 LETRAS=INKEYS: IF LETRAS="" THEN 610 
620 0=ASC (LETRAS) 

630 IF 0=50 THEN F=F+1:1F F>=10 THEN F=10 
640 IF 0=56 THEN F=F-1:1F F<=1 THEN F=1 
650 1F 0=52 THEN C=C-1:1F C<=1 THEN C=1 
660 IF 0=54 THEN C=C+1:1F C>=10 THEN C=10 
670 1F 0=42 OR 0=13 THEN A$="Xx":GOSUB 1860 
680 IF 0=32 THEN A$=" ":GOSUB 1860 

690 LOCATE 5,5 

700 PRINT "FILA: "3F3”COLUMNA: "3C 

710 1F 0<>70 AND 0<>102 THEN BOTO 590 

720 LOCATE 10,1 

730 PRINT " E 

740 LOCATE 1,20 

750 PRINT ” 

760 PRINT * Y 

770 PRINT " ' 4 

780 REM FIN SUBRUTINA LEER DAT 

790 RETURN 

B00 REM OOOO ONIX 

810 REM x* IMPRIMIR CELULAS * 

B20 REM OOOO AA 
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830 CLS 

840 G=G+1 

850 LOCATE 5,1 

860 PRINT "GENERACION NUMERO: ":G 
870 LOCATE 37,8 

880 PRINT "1234567890" 

890 FOR 1=1 TO 10 

900 LOCATE 35,8+1 

910 PRINT CHR$(47+1) 


920 FOR J=1 TO 10 

$30 F=1+1 

940 C=J+1 

750 LOCATE 35+C,74+F 
960 PRINT CELUS(I.J> 
970 NEXT J 

980 NEXT 1 

990 RETURN 


1000 REM FIN SUBRUTINA IMPRIMIR CELULAS 

VOTO REM AOIOOOOOOOIOIODIOIOIOIOIOO AA 

1020 REM * CALCULO DE GENERACIONES Y 

1030 REM OOOO ODIO OA 

1040 LOCATE 10,20 

1050 PRINT "ESPERA UN MOMENTO, ESTOY PENSANDO." 
1060 FOR I=1 TO 10 


1070 FOR J=1 TO 10 

1080 CELV1IS(1,J)=" " 

1090 NEXT J 

1100 NEXT 1 

1110 HAY=0 

1120 FOR C=2 TO 9 

1130 HAY=0 

1140 IF CELUS(1,C-1)<>" " THEN HAY=HAY+1 

1150 1F CELUS(1,C+1)<>" " THEN HAY=HAY+1 

1160 1F CELUS(2,0)<>" " THEN HAY=HAY+1 

1170 IF HAY>=4 OR HAY=1 THEN CELU1IS(1,C)=" " 
1180 1F HAY=2 OR HAY=3 THEN CELU1$(1,C)=CELUS(1,C) 
1190 IF HAY=3 THEN CELU1$(1,C0)="x*" 

1200 HAY=0 

1210 1F CELUS (10,C-1)<>" " THEN HAY=HAY+1 

1220 IF CELUS(10,C+1)<>" " THEN HAY=HAY+1 

1230 IF CELUS(9,C)<>" " THEN HAv=Hay+1 

1240 IF HAY>=4 OR HAY<=1 TREN CELV1I$(10,Cd=" " 
1250 IF HAY=2 OR HAY=3 THEN CELIAS(10,0)=CELU4 (10,0) 
1260 1F HAY=3 THEN CELU1$(10,C)="x" 

1270 NEXT € 

1280 HAY=0 


1290 IF CELUS(1,2)<>" " THEN HAY=HAv+1 


1300 IF CELUS(2,1)<>" " THEN HAY=H0Y+1 

1310 IF CELUS$(2,2)<>"'" THEN HAY=HOv1 

1320 1F HAY>=4 OR HAY=1 THEN CELU1I$/11 19” " 

1330 IF HAY=2 OR HAY=2Z THEN CELV1S(1, 1 )-MELLIS 11,4) 
1340 IF HAY=3 THEN CELVU1S(1,11="x* 

1350 REM ESQUINA SUPERIOR DERECHA 

1360 HAY=0 

1370 IF CELUS(1,9)<>" " THEN HAY=HAY+1 

1380 IF CELUS(2,9)<>" " THEN HAY=HAY+1 

1390 IF CELU$(2,10)<>" " THEN Hay=Hay+1 

1400 IF HAY>=4 OR HAY<=1 THEN CELUIS(1,10)=" ” 
1410 IF HAY=2 OR HAY=3 THEN CELI1S(1.10)=CELUS(1,10) 
1420 IF HAY=3 THEN CELIMerr 1001" e 

1430 HAY=0 

1440 IF CELUS(9,1)<>" " THEN HAY=HAY+1 

1450 IF CELUS(9,2)<>" " THEN HAY=HAY+1 

1460 IF CELUS(10,2)<>" " THEN HAY=HAY+1 

1470 1F HAY>=4 OR HAY<=1 THEN CELUV1IS(10,1)=" " 
1480 IF HAY=2 OR HAY=3 THEN CELUIS(10, 1)=CELUS(10,1) 
1490 IF HAY=3 THEN CELU1$(10,1)="x" 

1500 HAY=0 

1510 REM ESQUINA INFERIOR DERECHA 

1520 TF CELUS(9,9)<>" " THEN HAY=HAY+1 

1530 1F CELUS(9,10)<>" " THEN HAY=HAY+1 

1540 IF CELUS(10,10)<>" " THEN HAY=HAY+1 

1550 IF HAY>=4 OR HAY<=1 THEN CELU1IS(10,10)=" " 
1560 IF HAY=2 OR HAY=3 THEN CELU1$(10,10)=CELU$ (10,10) 
1570 1F HAY=3 THEN CELU1$(10,10)="x*” 

1580 REM PARTE INTERNA ” 

1590 HAY=0 

1600 FOR F=2 TO 9 

1610 FOR C=2 TO 9 

1620 HAY=0 


1630 IF CELUS(F-1,C-1)<>" " THEN HAY=HAY+1 
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1540 


CELUS (E-1,D)<>9" * 


THEN HAY=HAY+1 


1650 IF. CELÚS(F-1,C+1)<>" " THEN HAY=HAY+1 
16560 IF CELUS(F,C-1)<>" " THEN HAY=HAY+1 
1670 IF CELUS(F,C+1)<>" " THEN HAY=HAY+1 
1680 1F CELUS(F+1,C-1)<5" * THEN HAY=HAY+1 
1690 IF CELUS(F+1,C)<>" " THEN HAY=HAY+1 
1700 IF CELUS(F+1,C+1)<>" ” THEN ¡HAY=HAY+1 
1710 REM REGLAS DE EXISTENCIA 
1720 IF HAY>=4 OR HAY<1 THEN CELUIS(F,C)=" " 
1730 IF HAY=2 DR HAY=3 THEN CELU1$(F,C)=CELUS(F,C) 
1740 IF HAY=3 THEN CELU1S$(F,C)="x" 
1750 NEXT 
1760 NEXT 
1770 FOR F=1 TO 10 
1780 FOR C=1 TO 10 
1790 CELUS (F,C)=CELUIS(F,C) 
Z 1800 NEXT C 
1810 NEXT F 
1820 LOCATE 10,20 
1830 PRINT ” a 
1840 RETURN 
1850 REM FINAL SUBRUTINA DE CALCULO 
1850 REM PONER CELULA 
1870 CELUS(F,C)=A$ 
1880 PRINT AS 
1890 C=C+1 
1900 1F C<=10 THEN GOTO 1940 
1910 F=F+1 
1920 C=1 
1930 1F F>10 THEN F=1 
1940 RETURN 


El presente programa tiene una gran li- 
mitación en el número de células que puede 
manejar, ya que poniendo uno elevado la eje- 
cución se hace excesivamente lenta. 

Está estructurado en subrutinas para lo- 
calizar más fácilmente los diversos pasos del 
cálculo de las generaciones, existiendo funda- 
mentalmente tres, la de lectura de la configu- 
ración celular, la de impresión del universo, 
y, por último, la del cálculo de las generacio- 
nes. 

El programa está adaptado a ordenado- 
res AMSTRAD, en los que no habrá que reali- 
zar ningún cambio, en ordenadores compati- 
bles con IBM, cambiar en los locates la coor- 
denada X por la Y. En SPECTRUM recordar 
que las variables deben tener una sola letra y 
sustituir el LOCATE por PRINT AT. Si el orde- 
nador es un COMMODORE, cambiar el CLS 
por PRINT CHR$(147), y las líneas x$=IN- 
KEY$:1F X$="" THEN GOTO por GET x$. 


SOCIEDAD 
15 Filosofía. Lógica proposicional 


Dentro del amplio campo de la filosofía, 
una de las menos conocida y estudiada es la 
lógica; y dentro de ésta a su vez es la lógica 
proposicional. Quizá el abandono de esta dis- 
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ciplina se deba a su entronque con las mate- 
máticas y el álgebra de Boole, y a la separa- 
ción que parece debe existir siempre entre 
ciencias y letras, que parece irreconciliable. 

Vamos, pues, a repasar algunos con- 
ceptos de lógica proposicional y a intentar 
aclarar algo sobre el cálculo lógico y los ope- 
radores lógicos. 

Para empezar recordemos lo que es 
una proposición; una proposición es un enun- 
ciado que puede ser verdadero o falso. La ló- 
gica se vale del simbolismo y así en vez de 
emplear enunciados de contenido los simboli- 
za mediante letras; de modo y manera que en 
la lógica proposicional cada letra equivale a 
una proposición (se suelen usar las últimas le- 
tras, por ejemplo: p, q, r, etc.). 

Las proposiciones pueden ser simples y 
compuestas; las simples están formadas por 
una sola proposición y las compuestas por dos 
o más proposiciones. También pueden dividir- 
se en proposiciones de orden uno, orden dos, 
orden tres, etc., según el número de proposi- 
ciones simples que formen la proposición 
compuesta. 

Una vez definidas las proposiciones, su 
simbolismo y sus tipos vamos a pasar a las ope- 
raciones lógicas. Las operaciones lógicas de 
orden uno son las más simples, se trata sim- 
plemente de enunciados que tengan uno de 
estos dos valores; a saber: falso o verdadero. 
Normalmente se simbolizan así: 


MES AS, A AP TOTS 4 FE e DF 
ES TUN E 


— «l» = verdadero (V) 
— «0» = falso (F) 


Las operaciones lógicas de orden dos 
surgen al combinar dos proposiciones de or- 
den uno. Las posibilidades que pueden darse 
son las siguientes: 


Esta combinación se hace para que sur- 
jan proposiciones de orden dos que resultan 
de la unión (a través de ciertos operadores ló- 
gicos) de p y q; esta proposición resultante 
puede tener a su vez otros valores de verdad 
y falsedad. Vamos a estudiar algunas de las 
proposiciones principales de orden dos. 

En primer lugar, estudiaremos la pro- 
posición disyuntiva inclusiva; es aquella pro- 
posición de orden dos que sólo es falsa si lo 
son las dos proposiciones que la integran. El 
símbolo es «v». Equivale a la suma lógica. Se 
puede leer como «o»; p o q o. ambas. 


Fig. 3. 


La proposición conjuntiva es aquella 
proposición de orden dos que sólo es verda- 
dera en caso de serlo las dos proposiciones 
que la forman. Su símbolo de enlace es «; y 
equivale al producto lógico. Se puede leer 
como «y»; p y 4. 


Fig. 4. 


La proposición disyuntiva exclusiva la 
podemos definir como la expresión de orden 
dos que sólo es verdadera al ser verdadera 
una sola de las proposiciones que la forman (o 
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lo que es lo mismo, cuando hay un número im- 
par de «l»). El símbolo es (v», se lee p o q, 
pero no ambas, equivale al OR exclusive ló- 
gico. 


Fig. 5. 


Faltaría, por último, la proposición ne- 
gativa, que no es propiamente de orden dos, 
pues sólo hay una proposición; pero no es sim- 
ple al tener un signo conectivo, el de nega- 
ción. Su símbolo es «-» colocado encima de la 
letra que hace referencia a la proposición; se 
lee «n o p». Niega la variable de entrada. Equi- 
vale a la complementación lógica. 


Fig. 6. 


Dentro de la lógica proposicional des- 
tacan algunas leyes que vamos a repasar a 
continuación. Todas aquellas proposiciones 
tautológicas (es decir, que tiene todos sus va- 
lores de verdad a «1», o sea, verdadera en to- 
dos los casos) reciben el nombre de leyes de 
la lógica proposicional. Algunas de las leyes 
más importantes son las siguientes: 


Fig. 7. 


Vistos estos conceptos fundamentales 
de la lógica proposicional, pasaremos a reali- 
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zar un programa que nos recuerde los princi-- de «O lógica», «Y lógica», «O exclusiva lógica» 
pales operadores lógicos. Hemos realizado el y «complementación lógica». 
programa a modo de menú, con las opciones 


REA DIA 
REM %. OPERADORES LOGICOB % 
CL: 
PR 


NDS 
oo 


HÁHRUERURRINRARA ARA 


3s3s3ss 


1_- O LOGICO * 
OGICO 


Y ud 
O EXCLUSIVA ICA " 
rob li ON LOGICA" 

y" PULSA OPCION DESEADA "; 


333308 


O 
2 


REM 100040 IM 
REM * O LOGICO * 
REM 046000 61 960 0096 16d 


INT" P ¡RAFA TAB(15)3" Q"32+PRINT TAB(27)3" P v Q"1PRINT 
FOR I=0 TO 
FOR_J=0 TO 1 

PRINT 1,3,(1 OR J) 


NEXT 
NEXT_1 2¿PRINT:PRINT TAB(5)3" O LOGICO" 
RETURN 


$39S 


Pr du ul pu Ju ur po pu Judo Pa pudo Pr a ul pu pu pu 
¡Pe 
O 


=9000000000 


REM res 30 40 1010 e 0 


Ss 
PRINT Ad TAB(15);"0";+PRINT TAB(28);"P “ Q"3PRINT 
FOR 1=0 TO 1 
FOR_J=0 TO 1 

PRINT 1,J,(1 AND J) 


NEXT 

NEXT _ 1 ¿PRINT:PRINT TAB(5); “Y LOGICO" 

RETURN 

REM Id MM DMA 

REM * O EXCLUSIVA + 

REM * LOGICA * 

AFH e 

pe al TAB(16)3"0"3:PRINT TAB(27);"P XOR Q":PRINT 


50 FOR. 
3070 FOR _J=0_TO 1 á 
3080 PRINT 1,3, (1 XOR 3) 


70 NEXT 
00 NEXT I :*PRINT:PRINT TAB(5);" O EXCLUSIVA" 
O RETURN 


00 REM 2904 6 ed 06 20 616 HN MIRA 
REM * DONE ENTAGION E 


0 
* 
4030 REM seee dt 14 16 6 dl 0 16 0d ade 0 0 
4040 


050 PRINT TAB(13):" " 

4060 PRINT "P" ;2PRINT TAB(13);"P" 

4070 FOR _J=0 TO 1 

4080 PRINT Jj2 LET G=NOT J 

4085 IF. 6 _= -1 THEN PRINT Hrs A 
3 


3333 


33333 
SSSS30coocosecsoos 


uegun 
o 


e 
3588 


8 


EPR TAB (3) 3 "COMPLEMENTACION" 
00 REM mae add dde 6 0 261 
* OPCION FIN +* 
y40) bdo botado too 
PRINT :PRINT 2¿PRINT 
T "ESTAS SEGURO DE QUERER ACABAR (S/N) "¿R$ 
SS R$="S" OR RS$="s" THEN 5060 ELSE 50 
PRINT ¿PRINT 2: PRINT "*.FT1N* " END 


El programa funciona en ordenadores mar como fundamental, ésta es la educación fí- 
IBM y compatibles, en AMSTRAD, MSX, y sica. Es una materia de las consideradas como 


SPECTRUM. «marías», es decir, de las que se tienen como 
En COMMODORE cambiar: fáciles y de segunda importancia. Así, pues, 
— CLS por PRINT CHR$(147). vamos a intentar hacer un elogio de ella y re- 

— INKEY$ por GET X$. conocer los méritos e importancia que tiene. 
Ya desde antiguo, tanto griegos como 
PARA LOS MAS JOVENES romanos tuvieron una especial consideración 
1 Baloncesto a mantener el cuerpo ágil y fuerte, lo que hoy 


decimos «en forma», podemos considerar que 
Vamos a tratar en esta sección de una había un culto al cuerpo, como lo demuestran 
disciplina que en los colegios no se suele to- las estatuas clásicas que han llegado hasta 
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nuestros días. Basta con recordar algunas de 
las obras más famosas, como el Discóbolo, de 
Mirón; el Doríforo, de Policleto, que tiene el 
canon de un hombre fuerte, lo que hoy podía- 
mos considerar casi un culturista; cualquiera 
de las obras de Fidias; el Apolo, de Belvedere, 
etcétera. 

Así, pues, nuestras ansias de estar en 
forma no son nuevas, podemos aprovechar el 
dicho romano: «Nada es nuevo bajo el sol»; 
pues como ya hemos demostrado, en toda la 
Antigúedad clásica había un culto al cuerpo y 
una gran preocupación por la belleza. 

Aprovechando otro refrán romano (y 
esta vez dicho en romano auténtico, o sea, en 
latín): «Mens sana in corpore sano»; que en tra- 
ducción libre y parafraseando podemos decir 
que hace falta un cuerpo sano para tener un 
buen rendimiento del intelecto. 

Visto esto, tenemos que reconsiderar la 
postura que se toma normalmente hacia la 
educación física en la enseñanza actual; y de- 
cir que ha de ser una de las asignaturas funda- 
mentales. 

Con este fin y viendo que en nuestros 
días se vuelve a poner de moda la preocupa- 
ción por el cuerpo, vamos a realizar el primer 
programa deportivo de la historia de esta pu- 
blicación. 

Teniendo en cuenta el auge que está to- 
mando el baloncesto en nuestros días, hemos 
decidido dedicar este programa a ese espec- 
tacular deporte, puesto que cada vez se prac- 
tica más, y nuestro país mejora a grandes pa- 
sos tanto a nivel de clubes como de selección 
nacional. 


10 REM seres 4 A 
20 REM*BASKET « 
JO REM HI AR 


777 E TO 


El programa sirve para controlar los 
porcentajes que logramos durante un partido, 
así podemos mejorar el tiro, ver los rebotes 
capturados, cuántas asistencias hemos dado, 
qué tanto por ciento hemos anotado desde fue- 
ra de la línea de 6,25, cuántos tapones pone- 
mos, etc. 


ema | amarra pos [ams| ra plenos 


1 LIST 2 RUN 3 LOAD» 4SAVE» 5CONT 6, «LPT1 7TRON 
8TROFF 9KEY OSCREEN 


Fig. 8. Pantalla que sale en la versión 1.0. 


Hemos realizado dos versiones del pro- 
grama. La primera la podríamos llamar ver- 
sión muestra; en ella hemos colocado en líneas 
DATA los nombres de cinco jugadores de la 
selección nacional de baloncesto para poner 
sus porcentajes y que sirva como muestra. 
Sólo hemos puesto cinco para que no se hicie- 
ra demasiado largo el programa, pero si se 
quiere seguir un partido de baloncesto entero 
con todos los jugadores, basta con dimensio- 
nar las matrices al principio con diez o doce 
posiciones y cambiar los datos almacenados 
en las líneas DATA por los nombres de los ju- 
gadores de nuestro equipo favorito. 


4 REM y PRAGSAA DadUES adan doo 
5 REM + Abs crol (VERSION 1.0) »* 
6.REM +* SELECCION NACIONA * 
l: Pi 4 MRE MM: MI MIE A HE MNEIA 


40 

29 FOR I=1 TO 10 

70 PRINT: PRINTEPRIN 

80 PRINT B(15) E há IPN % 
90 PRINT TAR CIS)! " IO AX 

100 PRINT TAB(15);" XXX XXX X 
110 PRINT TAB(15); “ OOOO 
120 PRINT TAB(15);" XXX XXX 

130 PRINT TAB(15)5" XXXX 

140. PRINT TAB(15); XXXX 

150 PRINT:PRINTIPRIN 

160 PRINT TAB(22);" Mana STA" 
164 PRINT 


165 FRINT TAB (25); "CANAS T 
170 FOR _T=1 TO 250:NEXT T 
NET TO 


200 REM AL A 


210 REM *  INICIALIZAR A ARTABLES 
MATRICES 


220 REM + 
230 REM * DIMENSIONAR 


* 


* 
* 


240 REM 6 6 NH NO II 


250 DIM TTD(S) ,TAD(S),TPD(S) 
260 DIM TIT, ITAT (5): ¿TET(S) 


APRENDER 


Q 


o sjolaiotel ( O 


=J0 9 2 000 
e +5 = 


La segunda versión es más personaliza- 
da, es decir, sirve para tu equipo de amigos o 
el equipo del colegio; en ella al principio di- 
mensionas la matriz con el número de jugado- 
res que participéis y luego vas introduciendo 
los nombres de los jugadores a través de un 


EE: 


48 


ON EL ORDENADOR AAA EDS 


iZ X= 


INPUT; también los puedes almacenar en lí- 
neas DATA si quieres. 


Bueno, que tengas suerte en el partido 
y a ver si llegas a ser un Magic Johnson, un 
Ralph Sampson, un Abdul Jabbar, etc. FR 


nt O e a a 
7 . 

a AE A 

4 E E nn : 


2 


PRINT CHR$(147). 


En ordenadores COMMODORE poner 


en vez de CLS 


o 
+ 


El programa funciona sin problemas en 


equipos IBM y compatibles, AMSTRAD, MSX, 


y SPECTURM. 
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== Los primeros ordenadores 


partir del EDVAC, durante 
los años cuarenta, cincuenta 
y sesenta han ido apare- 
ciendo muchas máquinas, 
basadas en él. 

Los primeros organis- 
mos que dispusieron de or- 
denadores fueron, como 

cabe esperar, Universidades, principalmente 
americanas, aunque también británicas. Los 
grandes calculadores, complicados, fueron 
decayendo poco a poco hasta desaparecer. 
Sin embargo, para centrarnos en el embrollo 
de nuevas máquinas que fueron apareciendo 
después de la presentación del EDVAC, se 
pueden establecer varios períodos, marcados 
por acontecimientos relevantes, que han cam- 
biado el rumbo de la informática, 

Hasta 1951, todos los ordenadores que 
fueron creándose eran máquinas carísimas. 
Sólo grandes organismos, Estado, Universida- 
des, etc., podían permitirse gastar millones de 
dólares en una máquina, que si bien realizaba 
tareas que hasta el momento no habían podi- 
do acometerse, en la mayoría de los casos su 
costo no las hacía rentables en absoluto. En es- 
tos años, poca gente creía en que las «hijas» 
de esas máquinas invadirían todas las tareas 
imaginables, llegando a los hogares domésti- 
cos, donde el niño de diez años las utilizaría 
para cálculos y juegos, el ama de casa, para 
llevar su pequeña contabilidad y realizar la 
declaración de la renta. Hasta el momento, ni 
la IBM se había interesado especialmente por 
ellas, pues Thomas Watson (su director) había 
quedado decepcionado tras su colaboración 
en el diseño del Mark 1. 

A partir de 1951, la mentalidad de los 
fabricantes cambia, y algunos comienzan a de- 
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cidirse a comercializar sus máquinas. Estás 
van cambiando progresivamente para adap- 
tarse a las necesidades concretas de las indus- 
trias que las compran, pero siguen estando in- 
fluenciadas por su nacimiento, al abrigo de las 
necesidades del Ejército, principalmente. 
Volvamos, sin embargo, a 1945, El ED- 
VAC acaba de aparecer dejando obsoleto a 


¿Sabía usted que... 


¿Sabía usted por qué se tardó tanto tiempo en 
fabricar el ordenador EDVAC? No, no se debió a pro- 
blemas técnicos, que iban resolviéndose en los tiem- 
pos previstos. El retraso se debió a las enormes de- 
savenencias que surgieron entre sus creadores, Ec- 
kert, Mauchly y Von Neumann. El problema princi- 
pal, naturalmente, fue el económico. Eckert y 
Mauchly eran dos norteamericanos prácticos, para 
los que el trabajo realizado con gusto tiene un valor, 
pero que además es necesario, si se puede, obtener 
de él los mejores beneficios. En los primeros momen- 
tos, cuando todo lo que tenía el equipo eran unas 
ideas magníficas, no había desunión, sólo problemas 
por resolver. Al ir pasando el tiempo, consiguiéndo- 
se los objetivos previstos, Eckert y Mauchly conside- 
raron las posibilidades del proyecto, desde el punto 
de vista comercial. Naturalmente, para obtener be- 
neficios debía constituirse una sociedad, en la que 
participara el equipo, y que se ocupara de dar for- 
ma al problema comercial que surgía. Los restantes 
miembros del equipo, a la cabeza de los cuales se 
encontraba Von Neumann, tenían otros intereses 
muy distintos. Lo que deseaban era dedicarse a se- 
guir investigando, bajo los auspicios de la Universi- 
dad, Mientras Eckert y Mauchly se interesaban por 
crear una nueva compañía, ocuparse de patentes, 
etcétera. Von Neumann estaba mucho más interesa- 
do en involucrar en sus trabajos a la Universidad, di- 


fundir los diseños, dar conferencias, etc, El trío, tan 
avenido en los comienzos de 1945, era ahora absolu- 
tamente incompatible. 

Tras dos años de luchas intestinas, en las que 
entre los temas a discutir, uno de los más candentes 
era la paternidad del diseño, en abril de 1947, la jus- 
ticia emitió su fallo. La compañía privada no podría 
crearse, ya que se consideraba que las patentes eran 
de dominio público. La verdad es que Von Neumann 
siempre había defendido como suyo propio un pe- 
queño diseño previo de la máquina, en el que se es- 
tablecían los principios básicos, aunque parece que 
la realidad es que, aunque estaba firmado por él, ha- 
bía sido creado entre los tres, Eckert Mauchly y él. 


otro gran calculador, algo anterior a él, el 
ENIAC. Pero así como el EDVAC desbancó al 
ENIAC, hubo otros ordenadores basados en el 
EDVAC que aparecieron casi al mismo tiem- 
po que éste, e incluso en Inglaterra varios años 
antes. En el recuadro anterior hablamos de las 
enormes divergencias existentes en el equipo 
que diseñó el EDVAC. Por un lado, el presti- 
gioso profesor Von Neumann, deseando pre- 
sentarlo al mundo científico, y por otro, los 
profesores Ecker y Mauchly, que preferían co- 
mercializarlo, y sacar de sus experiencias, 
ciencia e inteligencia un provecho material di- 
recto y sustancioso.) Estas querellas y des- 
acuerdos retrasaron la fabricación de la máqui- 
na hasta 1951, y para entonces otros (mejor 
avenidos) habían aprovechado la lección. En- 
tre las nuevas máquinas que aparecieron cita- 
remos el IAS, BINAC, EDSAC, el Manchester 
MARK 1 y el proyecto ACE. Estos cinco orde- 
nadores pueden considerarse los primeros. El 
ENIAC y el SSEC también pueden quizá in- 
cluirse dentro de la denominación de ordena- 
dor, aunque se trate de calculadores clásicos. 

Von Neuman y Goldstine seguían man- 
teniéndose unidos, afectivamente, y tenían 
contactos periódicos. En uno de estos contac- 
tos decidieron utilizar el ENIAC de un modo 
distinto, aprovechando algunas de sus tablas 
de función como memoria para almacenar las 
instrucciones. La idea era convertir el antiguo 
calculador en un ordenador. Sin embargo, un 
detalle fundamental distinguiría siempre el 
ENIAC de los ordenadores de arquitectura, 
Von Neumann: el ENIAC no disponía de uni- 
dad de control, pieza fundamental de cual- 
quier ordenador. 

Se hicieron los cambios precisos, e in- 
cluso se llegó a realizar una demostración, en 


51 


El ordeandor BINAC., 


la que participó una especialista en programa- 
ción, Adele, la esposa de Hermann Goldstine, 
pero la experiencia no pasó de eso, una pe- 
queña práctica que ayudaría al equipo a ir 
comprendiendo mejor las limitaciones y ven- 
tajas de los distintos ordenadores. Veamos a 
continuación qué ocurrirá en Europa a media- 
dos de siglo, 

Entre los países que comenzaron a inte- 
resarse por la nueva ciencia en esos años des- 
tacó la Gran Bretaña. Este país acababa de ter- 
minar una guerra que le había dejado exhaus- 
ta. Sin embargo, obtener dinero para investi- 
gación no era tan imposible como cabía es- 
perar. Por un lado, durante la guerra se ha- 
bían realizado experiencias con «calculado- 
res» más o menos universales en el campo de 
la criptografía, ayudando a avanzar el fin de 
la contienda, y salvando numerosas vidas 
(aliadas, naturalmente). Por otro, el Ejército 
era popular y admirado, y había protegido con 
dedicación y eficacia a su nación. A pesar de 
sus dificultades económicas, el Gobierno de- 
cidió avanzar el programa nuclear, y, por tan- 
to, necesitaba calculadores, programas de in- 
vestigación e investigadores. 

Las universidades comenzaron a salir 
de su letargo. Ya no estaban supeditadas a in- 
vestigar sólo en determinados campos, sus 
profesores con prestigio podían investigar e 
incluso recibir ayuda del Gobierno, si sus tra- 
bajos eran considerados interesantes. A me- 
diados de la década de los cuarenta, existía 
un plantel envidiable de matemáticos de gran 
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altura. Entre ellos McCulloch, Wilkes Wo- 
mersley y Newman, padres de muchos de los 
proyectos de las nuevas máquinas universa- 
les. La mayoría de ellos había viajado a los Es- 
tados Unidos y conocía los trabajos de Von 
Neumann, Pitts y Turing, sin duda el de más 
prestigio en Inglaterra, a pesar de sus excen- 
tricidades. 

Tres matemáticos de gran talla diseña- 
rían tres prototipos británicos fundamentales, 
de los que sólo dos serían terminados. La ca- 
lidad de estos trabajos sería, si no superior, al 
menos comparable a la alcanzada en los pro- 
totipos americanos. Veamos algo más sobre 
estos grandes investigadores, Womersley, 
Wilkes y Newman. 

Uno de los centros de investigación bri- 
tánicos más importantes era el National Physi- 
cal Leboratory, que había estado y continuaba 
en contacto con otros centros de investigación 
en los Estados Unidos de América. Entre sus 
miembros, el profesor VWomersley estaba bas- 
tante interesado en los calculadores, y ya ha- 
bía trabajado en Cambridge y Manchester con 
analizadores diferenciales ingleses. También 
conocía la labor publicada de Turing (1936) y 
otros trabajos de matemáticos ingleses y ame- 
ricanos, implicados en proyectos de calcula- 
doras. 

Womersley fue invitado a los Estados 
Unidos para conocer los trabajos de EDVAC y 
MARK 1. 

Cuando volvió de los Estados Unidos es- 
taba muy convencido del magnífico futuro de 
las nuevas máquinas, por lo que escribió a Tu- 
ring muy admirado entonces por sus trabajos 
con este tipo de máquinas durante la guerra, 
Deseaba que le ayudara en la creación de un 
proyecto de órdenador inglés electrónico. 
Hasta ese momento, en Gran Bretaña sólo se 
habían creado las máquinas de Turing (duran- 
te la guerra) y una serie de grandes calcula- 
dores, los Colossus, que también utilizaban tu- 
bos electrónicos, aunque no eran totalmente 
máquinas universales. Estas máquinas (las Co- 
lossus) habían sido desarrolladas por Turing, 
junto con un gran matemático Max Newman, 
que era profesor de matemáticas en la Univer- 
sidad de Manchester. 

La nueva máquina que diseñó Turing, 
junto con el profesor Womersley, era realmen- 
te distinta a las demás. Se llamaría ACE (Au- 
tomatic Computing Engine). Era rápida (un mi- 
llón de pulsaciones por segundo), cinco veces 
superior al ENIAC. Su memoria era de 204.800 
bits, también considerable. La máquina esta- 
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ba diseñada basándose en la arquitectura del 
EDVAC, pero era innovadora y original, Su 
originalidad consistía principalmente en que 
además de disponer de algoritmos registra- 
dos en su interior, éstos se podían modificar 
durante la operación de la máquina por las 
propias instrucciones. La máquina resultó ser 
muy cara, y compleja. Además, y pese a una 
gran publicidad, hubo indecisiones entre sus 
financiadores, y como resultado, se terminó en 
1950, sin la participación de su principal crea- 
dor, Turing, que, aburrido de problemas no 
técnicos, se había marchado a Manchester con 
el profesor Max Newman. 

Es una pena que los grandes creadores 
tengan tantos problemas para conseguir ver 
sus creaciones. Los ingleses habían hecho de- 
masiada publicidad en torno a esa máquina 


- «superior a los modelos americanos», según los 
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principales diarios y radios británicos. 

A mediados del año 1946, en la Univer- 
sidad de Manchester, el profesor Max New- 
man había comenzado un proyecto de. máqui- 
na de uso general, cuyo prototipo terminaría 
en 1948. El director del proyecto, F. Williams, 
había diseñado un nuevo tipo de memoria, ba- 
sándose en tecnologías utilizadas en la gene- 
ración de pantallas de radar e imágenes de te- 
levisión: el tubo de rayos catódicos. Los bits vi- 
sibles en la pantalla se almacenaban en la me- 


moria como puntos (impulsos eléctricos positi- 
vos o negativos). Además, dentro de la arqui- 
tectura de la máquina, existían otras seis me- 
morias CRT que podían visualizarse en panta- 
lla, Fue una revolución. Se trataba de una tec- 
nología barata, rápida y que no necesitaba de 
grandes dimensiones. Las pantallas podían 
contener 2.048 bits o 1.024. Sin embargo, no 
era muy fiable, ya que algunos impulsos se 
transformaban o se perdían, con el correspon- 
diente perjuicio. 

El primer «manual de programación» 
fue también obra de Turing, y data de media- 
dos del año 1948. Se trataba de un código para 
escribir los programas utilizando las teclas de 
un teletipo para representar las largas series 
de cifras binarias. De esas mismas fechas data 
el primer programa que fue ejecutado en un 
ordenador: 21 de junio de 1948. Williams intro- 
dujo el programa en la máquina y pulsó el bo- 
tón correspondiente. «A partir de ese momen- 
to, comenzó una danza loca, una danza de 
muerte que no daba resultados utilizables... 
pero en un momento dado se paró, y, brillan- 
do, reluciendo, en el lugar adecuado, apare- 
cieron los resultados esperados» (son palabras 
de Williams, jefe del proyecto, que estaría na- 
turalmente entusiasmado en ese momento his- 
tórico). 

Otro centro de investigación de van- 
guardia era la Universidad de Cambridge, en 
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cuyo Laboratorio de Cálculo trabajaba el pro- 
fesor Wilkes como director. El profesor Wil- 
Kes había asistido a un curso de verano en la 
Moore School, y conocía perfectamente los tra- 
bajos de Von Neumann, El tercer prototipo bri- 
tánico fue diseñado por el profesor Wilkes en 
su Universidad. Fue terminado algo más 
tarde que el Manchester MARK 1, y se llamó 
EDSAC, «Electronic Delay Storage Automatic 
Calculator», calculador electrónico automático 
de memoria de retardo, porque disponía de 
una memoria de líneas de retardo de mer- 
curio. , á 

La máquina estaba basada en la arqui- 
tectura de Von Neumann del EDVAC. Dispo- 
nía de unos 4,000 tubos de vacío y de la nueva 
memoria de líneas de retardo, de 32 líneas (se 
podían escribir cifras de treinta y dos dígitos 
con diecisiete decimales). 

Este tipo de memorias fue inventado 
por Eckert y utilizado en algunos de los pri- 
meros ordenadores. Consistía fundamental- 
mente en que los impulsos eléctricos que re- 
presentaban la información a almacenar circu- 
laban por tubos y eran enviados de un punto 
a otro como si fueran un eco. Como este «eco» 
iba perdiendo intensidad con el tiempo, era 
activado regularmente, para mantenerlo en su 
estado inicial. ; 

La máquina fue presentada en Man- 
chester en 1949, y constituyó un gran éxito. 
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3 La informática aplicada 
a la producción industrial 


A informática ha ido pene- 
trando en la industria afec- 
tándola seriamente. De este 
modo, ha pasado a ser un 
problema político, patronal, 
e incluso sindical. El proble- 
ma ha surgido debido a los 
cambios que ha provocado 
en la tecnología, pero principalmente por los 
producidos a nivel humano (tampoco debemos 
olvidarnos, sin embargo, de las desviaciones 
del capital, que pueden pasar a otros países si 
los productos de vanguardia informática se 
compran a empresas extranacionales y que 
acaban incidiendo en los problemas huma- 
nos). 

Generalmente, los cambios tecnológi- 
cos se asocian a reducción de plantillas, y 
otros inconvenientes que aparecen casi siem- 
pre antes que las ventajas que producen di- 
chps cambios. No revisaremos aquí esta visión 
simplista del problema, y nos limitaremos a 
ver los cambios que ocasiona la informática en 
la producción industrial. 

En la empresa moderna los sistemas 
tradicionales de gestión de la mano de obra 
son absolutamente inadecuados para sacar 
partido de las nuevas tecnologías. No es posi- 
ble organizar el trabajo tal y como se realizaba 
adecuación entre la tecnología avanzada que 
La gestión de stocks se llevaba a cabo manual- 
mente, o mecanográficamente. En cualquier 
etcétera) y en muchos casos, una mayor ad- 
quisición de personal. 

Es, pues, fundamental que exista una 
adecuación entre la tecnología avanzada que 
se va a utilizar y la organización del trabajo 
con esta tecnología. En muchos casos, si esta 
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adecuación no existe, las enormes inversiones 
que suelen suponer la adquisición de alta tec- 
nología no tienen como resultado una mejora 
en la productividad, que, a fin de cuentas, sue- 
le ser la razón primordial de adoptar dichas 
tecnologías de vanguardia. 

En tiempos anteriores, la industria utili- 
zaba máquinas cuyos movimientos estaban 
controlados mediante relés electromecánicos. 
La gestión de stocks se llevába a cabo manual- 
mente, o mecanográficamente. En cualquier 
caso, los sistemas eran lentísimos, y además, 
utilizaban mucho espacio. A un mayor control, 
solía acompañar un mayor espacio de almace- 
namiento de información (armarios, ficheros, 
etcétera) y en muchos casos, una mayor ad- 
quisición de personal. 

La increíble capacidad de cálculo de 
los ordenadores modernos, y sobre todo sus 
posibilidades de almacenar y utilizar en su 
momento cantidades ingentes de datos, los ha 
hecho perfectos como dispositivos de control 
de muchas máquinas herramienta, además de 
su labor algo más tradicional de manejo de 
stocks, Más aún, al ir bajando su precio y su 
volumen, se ha podido disponer de más poten- 
cia y capacidad de cómputo para un mismo 
precio, redundando en una mayor utilidad 
para muchos proyectos (algunos de los cuales, 
por su pequeño volumen, no podía pensarse 
en que fueran mecanizados hasta ahora). 

Otro punto a considerar es el proyecto 
de fabricación industrial de un determinado 
producto. La relación entre el proyecto y la fa- 
bricación posterior nunca ha sido tan estrecha. 
Hoy en día, antes de pasar a fabricar cualquier 
producto, se analizan cuidadosa y exhaustiva- 
mente sus condiciones de fabricación, monta- 
je, almacenamiento, etc., para que éstos sean 
óptimos. (Es muy común fabricar elementos, 
considerando, por ejemplo, su forma de fun- 
ción de las dificultades de almacenamiento). 


Tampoco debemos olvidarnos de la co- 
municación que debe existir entre los trabaja- 
dores o los equipos de fabricación y otros es- 
tamentos del proceso de fabricación, Por lo 
general, las relaciones entre unos y otros com- 
ponentes de la fábrica no eran anteriormente 
tan fluidas como cabía esperar. Aunque exis- 
tían informes, éstos terminaban por limitarse a 
indicar condiciones o procesos extraordina- 
rios, existiendo una tendencia generalizada a 
ir omitiéndolos, o al menos reservándolos para 
casos especiales. 

Las condiciones tradicionales han teni- 
do que irse abandonando paulatinamente si el 
industrial deseaba al menos sobrevivir. Las 
técnicas tradicionales empleaban mucha 
mano de obra, que no era tan cara como hoy 
en día. 

Actualmente, a partir del flujo de infor- 
mación creado por la informática, que ha mo- 
dificado las condiciones de producción indus- 
trial tan drásticamente, las piezas se diseñan 
partiendo de un software estándar, y existe 
una relación óptima entre el diseño-fabrica- 
ción-control. Las operaciones suelen concen- 
trarse en una máquina única, vigilada por per- 
sonal muy especializado y flexible. La automa- 
tización va aumentando progresivamente, 
pero suele ser autorregulable, es decir, en 
caso de que alguno de los órganos de la má- 
quina falle, el proceso procura continuar, bajo 
las nuevas condiciones especiales que se han 
producido. Japoneses y americanos han dise- 
ñado prototipos sin ningún tipo de vigilancia. 
Los resultados no han sido todo lo amplios que 
se deseaba. Normalmente, en trabajos com- 
plejos, los talleres sin vigilancia no han podi- 
do completar la totalidad de las tareas, que- 
dando algunas reservadas para personal es- 
pecializado. Además, el número de horas de 
trabajo sin supervisión que se consideró ópti- 
mo para la mayoría de los prototipos fue de 
ocho horas, mucho menos de lo que cabía es- 
perar. 

En una fábrica de automóviles, la sec- 
ción que se ocupaba de la manufactura de cár- 
teres de cajas de cambio debía fabricar dos 
receptáculos que unidos constituían la caja. 
Estos dos elementos debían fresarse, taladrar- 
se y prepararse adecuadamente. La prepara- 
ción de estas dos piezas comporta una dece- 
na de operaciones, cuyas tolerancias son ade- 
más mínimas, Como hemos indicado antes, 
hace unos años estas operaciones estaban con- 
troladas por sistemas provistos de relés elec- 
tromecánicos. Los sistemas modernos utilizan 
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autómatas programables (es decir, máquinas 
gobernadas por un ordenador) que controlan 
los desplazamientos de los distintos brazos y 
equipo de la máquina con una precisión de 
centésimas de milímetro. Muchos de estos 
equipos van provistos de un sistema de man- 
tenimiento que utiliza un equipo de vídeo, uni- 
do al autómata. Cuando el equipo se para, o 
tienen algún problema, el sistema de mante- 
nimiento indica el punto donde se produjo el 
fallo, su causa, deteniendo, si es necesario, la 
máquina, o las máquinas relacionadas con ella, 
que no podrían trabajar adecuadamente si 
ésta se detiene. 

El sistema también controla otras ope- 
raciones, como el recambio de ciertas piezas, 
afilado, etc., cada cierto tiempo (puede ser 
cada 500, 700, 1.000 piezas que pasen por la 
máquina). Hasta el momento, es el personal es- 
pecializado el que realiza las necesarias su- 
pervisiones de ciertos cambios de herramien- 
ta, e incluso otras pequeñas tareas que se rea-* 
lizan manualmente. Pero el trabajo de estas 
personas no consiste simplemente en pasear- 
se por la unidad, comprobando que no exis- 
ten problemas. Nórmalmente, en una planta 
de fabricación existen muchas máquinas, que 
requieren la atención y el trabajo de las per- 
sonas que están a su cuidado, vigilando el ma- 
terial, y en otras pequeñas actividades com- 
plementarias, pero no por ello poco impor- 
tantes. : 

Los sistemas actuales de fabricación 
han superado a los existentes hasta hace po- 
cos años en unas cuotas increíbles del 50 al 70 
por 100, (Esto significa que en una unidad 
de tiempo, los sistemas actuales fabrican de 
un 50 a un 70 por 100 más de piezas). Esta 
mejora tan espectacular está basada princi- 
palmente en la informatización de la industria. 
Las velocidades, precisión, autorregulación, 
han aumentado sustancialmente debido a las 
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condiciones de servicio a la máquina, y a las 
uniones entre los distintos procesos, calcula- 
das para que sean las óptimas alcanzablés, y 
que de este modo aumente considerablemen- 
te la producción. Se sabe mucho antes de su 
producción los costes exactos de cada pro- 
ducto según sea el proceso que sufrirá. 

Las modificaciones de las condiciones 
tradicionales han hecho frágiles a los sistemas 
de producción. En muchos casos, las propias 
máquinas, o las herramientas que utilizan, re- 
sisten mal las velocidades de corte, o las ca- 
dencias propias de cada producción. Por otro 
lado, existe una enorme coordinación entre las 
operaciones de una máquina y entre una má- 
quina y las restantes que integran una cadena 
de producción, lo que obliga a precisiones 
muy altas, El período de montaje en serie 
(cuya duración se suele multiplicar por dos, 
ccn respecto a los valores previstos) puede 
verse afectado negativamente por las múlti- 
ples modificaciones debidas fundamental- 
mente a errores de concepción. Es frecuente 
que estas modificaciones sean achacables a los 
problemas surgidos al informatizar la produc- 
ción, mejorando velocidades, y, en general, 
obteniendo unas características muy superio- 
res a las que eran frecuentes anteriormente, 
En muchas ocasiones no se consiguen alcan- 
zar los ritmos de fabricación previstos porque 
las herramientas de las máquinas se desequi- 
libran debido a determinados fallos dentro del 
proceso general. Este puede considerarse 
como una «construcción» o mecano, en el que 
unas piezas se apoyan en otras. Si una falla, o 
está colocada de forma imperfecta, las demás 
acusarán dicho fallo, funcionando con un ren- 
dimiento más bajo, o simplemente parándose 
y deteniendo el proceso (lo que ocasionará en 
muchos casos la detención de otras máquinas- 
proceso en cascada). 

Este tipo de dificultades no significan 
en absoluto que el fabricante deba conformar- 
se y remediarlas como pueda. En la práctica, 
son superables, y sólo indican que la informa- 
tización en la producción exige calidades y 
precisiones superiores a las aceptadas ante- 
riormente. De todo lo expuesto, podemos de- 
ducir que las concepciones y diseños tradicio- 
nales no están generalmente a la altura de las 
necesidades de los nuevos sistemas de pro- 
ducción. Los ajustes técnicos y precisiones 
permitidas hace unos años no son aceptables 
con estas nuevas tecnologías, tan complejas y 
automatizadas, El maestro de taller que ve una 
pieza defectuosa no puede pararse a «arre- 
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glarla», o dársela al aprendiz (en este caso 
inexistente). Sus máquinas deben ser absolu- 
tamente fiables, ya que si existen errores, és- 
tos no podrán subsanarse con un poco más de 
trabajo y buena voluntad. 

Además de unas herramientas fiables, 
de calidades muy superiores a las utilizadas 
anteriormente, la cadena de producción debe 
disponer de un equipo formado durante el pe- 
ríodo de montaje que conozca perfectamente 
el funcionamiento del autómata. También 
debe contar con otro equipo de mantenimien- 
to que sea capaz de afrontar y solucionar con 
el mínimo tiempo posible las averías. 

El fin principal de informatizar la pro- 
ducción es alcanzar cotas de productividad 
superiores. (La producción debe aumentar 
por unidad de capital —este incluye maquina- 
ria, materia prima y salarios—.) Naturalmente, 
esta productividad está muy relacionada con 
las detenciones (de todo tipo) de la cadena (en- 
tre las que se cuentan cambios de herramien- 
tas, afilados, etc.). Por tanto, uno de los objeti- 
vos fundamentales es el máximo rendimiento 
de las máquinas (que no disponen de stocks 
tampón entre unas y otras). Los operadores di- 
rectos, por tanto, tienen una tarea fundamen- 
tal, y deben estar muy capacitados para que 
las detenciones sean mínimas. Como estamos 
viendo, alcanzar cotas de fabricación tan altas 
exige pequeños índices de error, altas calida- 
des y altas cualificaciones del personal. 

Con el fin de poder alcanzar las cotas 
previstas es frecuente disponer de varios 
equipos de personal especializado para una 
misma tarea, En muchas ocasiones, si una má- 
quina concreta de la cadena deja de funcio- 
nar, sólo es posible tomar la determinación de 
alimentar las restantes de la cadena con un 
«stock ficticio», servido por los propios opera- 
dores. El resultado no será una detención ab- 
soluta, pero generará multitud de pequeños 
problemas, que posiblemente agraven la si- 
tuación original. 

Además de los problemas anteriores, 
deben considerarse otros aspectos del traba- 
jo de los operadores. Este, en general, es re- 
petitivo, y puede dar lugar a distracciones fa- 
tales (frecuentemente deben cambiar una de- 
terminada cuchilla, o colocar un elemento en 
un punto determinado, siempre el mismo du- 
rante toda la jornada). En general, las condi- 
ciones de trabajo se van deteriorando con el 
tiempo, al ir acostumbrándose el trabajador al 
ritmo (cadencia) de trabajo de las máquinas. 
Sin embargo, los operarios, por otro lado, de- 
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ben reaccionar rápidamente ante las condicio- 
nes excepcionales, disponiendo de una capa- 
cidad de discernimiento y toma de decisiones 
adecuada a las instalaciones que está contro- 
lando, 

Los jóvenes son los que más se adecúan 
a este tipo de trabajos. Por un lado, no están 
acostumbrados a trabajar con sistemas tradi- 
cionales, a los que han tenido que adaptarse, 
para a continuación olvidarse de ellos, y por 
otro, suelen tener cualificaciones más altas 
que sus progenitores, estando mucho más 
acostumbrados que ellos a las innovaciones 
que van surgiendo en todos los campos. 

Veamos muy sucintamente cómo suele 
repartirse el trabajo en estas líneas de produc- 
ción: 

— La responsabilidad de cada línea re- 
cae colectivamente sobre un grupo de opera- 
dores, bajo la dirección del maestro de taller. 
Cambian herramientas e intervienen en pe- 
queñas averías, existiendo turnos rotativos 
para determinadas tareas. : 

— Es fundamental que los operadores 
sean polivalentes, es decir, sepan operar en la 
totalidad de las máquinas que componen la lí- 
nea. También es importante que vayan rotan- 
do en el manejo de todas las máquinas, para 
que se mantengan al día en su funcionamiento. 

— Las averías debe solucionarlas el 
equipo de mantenimiento, compuesto por per- 
sonal especializado (en este equipo debe ha- 
ber especialistas en fluidos, mecánicos, elec- 
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tricistas, especialistas en hardware, software, 
etcétera. 

Resumiendo, el trabajo está organizado 
por especialistas, no por el personal que lo 
realiza. Este es polivalente y muy cualificado 
(no obedece exactamente a las normas vigen- 
tes hasta ahora, de división del trabajo y rea- 
lización repetitiva de la misma tarea). Final- 
mente, la reparación de las averías es tarea 
de especialistas, mucho más preparados que 
los operadores para minimizar los tiempos de 
detención de las máquinas. 

La informatización de la producción in- 
dustrial exige un flujo creciente de informa- 
ción, y Cualificaciones altas de los trabajado- 
res. Esperemos que sirva para mejorar el ni- 
vel de vida y alcanzar cotas de confort más al- 
tas para los propios trabajadores. No debemos 
olvidar que no es lo mismo productividad que 
productivismo, y que la felicidad consiste en 
sentirse pleno, no en tener más. 


TERMINOLOGIA "7 


GLOSARIO DE TERMINOS 


Autómata programable. Máquina-herra- 
mienta automatizada y controlada por pro- 
grama, es decir, la característica fundamen- 
tal del autómata programable son las facili- 

- dades que ofrece para la modificación del 
programa (secuencia de tareas que ha de 
realizar la máquina). También suele desig- 
narse con el nombre de robot industrial. 


Autorregulable, proceso. Las tareas que 
componen un determinado proceso de fa- 
bricación se dice que constituyen un siste- 
ma autorregulable cuando el conjunto está 
dotado de mecanismos mediante los cuales 
si se produce un fallo de algún elemento 
productivo o máquina, el sistema asigna au- 
tomáticamente a esa tarea otros elementos 
productivos y/o herramientas, o elimina una 
de las fases de producción afectadas. 


Fragilización de un sistema. Pérdida de 
la flexibilidad del conjunto productivo fren- 
te a la posible aparición de fallos, averías, 
etcétera. Si los sistemas productivos no es- 
tán bien diseñados, la automatización indus- 
trial puede disminuir la flexibilidad del con- 
junto, haciendo más «frágil» el sistema. 


Relé electromecánico. Dispositivo de con- 
trol de tareas: la tarea básica asignada a un 
relé es la apertura o cierre automático de 
uno o varios*circuitos eléctricos. En los pro- 
cesos productivos, en general, los relés se 
suelen accionar mediante numerosos meca- 
nismos: contacto físico, movimiento de una 
leva, cierre eléctrico de un circuito auxiliar, 
etcétera. 


Stock. Almacenamiento. Conjunto de elemen- 
tos almacenados bien sea bajo la forma de 
materia prima, como productos intermedios 
semielaborados, o como productos termi- 
nados. 


Stock ficticio. En un sistema productivo en 
cadena, parte de los elementos de produc- 
ción que se introducen en el sistema pro- 
ductivo desde el exterior de dicho proceso, 
manualmente, por parte de los operadores, 
cuando se produce una rotura del stock de 
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productos intermedios en un punto de la ca- 
dena. Suele producirse por una avería o 


- desfase entre dos etapas de la cadena. 
Stock tampón. Almacenamiento intermedio 


que se establece entre dos etapas de una 
cadena de producción cuando se prevé que 
pueden surgir discrepancias entre la capa- 
cidad de alimentación del stock de la cade- 
na previa y las necesidades de consumo de 
la etapa subsiguiente. 


Turnos rotativos. La tendencia actual en los 


sistemas de producción automatizados es 
sustituir la vieja norma de «especialización 
en el trabajo» por el nuevo concepto de «tra- 
bajadores polivalentes», capaces de asumir 
cualquiera de las tareas que hay que reali- 
zar en una etapa del sistema productivo. 
Este nuevo esquema de trabajo se comple- 
ta con el establecimiento de turnos rotati- 
vos, que mantienen actualizados los conoci- 
mientos del trabajador, y evitan el cansan- 
cio que se solía producir cuando un opera- 
rio realizaba durante períodos largos una 
misma tarea, de forma repetitiva. 


Sistema de desbarbado de cajas de cambio en una factoría de 
automóviles. 


-—— AA 


VOCABULARIO DE INFORMATICA NAAA 


No equal. Operador de relación que indica 
una desigualdad. Suele indicarse mediante 
los caracteres “< >""> <” O "NE”. 


No lineal, programación. En investigación 
operativa, procedimiento para obtener el 
máximo o mínimo de una función, cuyas va- 
riables deben cumplir ciertas imposiciones. 
Dichas imposiciones o la propia función no 
son lineales (o ambas cosas). En contraposi- 
ción a programación convexa, dinámica, en- 
tera lineal, matemática o cuadrática. Tam- 
bién puede indicar una optimización no li- 
neal. 


Non polarized return to zero recording. 
Término inglés que indica un método de 
grabación en el que la condición de refe- 
rencia es la ausencia de magnetización. De 
este modo, los unos se especifican median- 
te una condición de magnetización determi- 
nada, y los ceros por la ausencia de magne- 
tización. 


Non return to cero recording. Término in- 
glés que indica un método de grabación en 
el cual el cambio en el estado de magneti- 
zación que representa el cero o el uno es el 
que especifica la condición de referencia. 


NOR. Operador lógico que posee la siguien- 
te propiedad: si P, Q y R son elementos sim- 
ples, NOR de P, Q, R es verdad si todos los 
elementos son falsos, y falso si al menos uno 
so si P es verdadero. Su tabla de verdad es 
sentado con frecuencia mediante dos ins- 
trucciones: OR y NOT. Su tabla de verdad 
es la siguiente: 
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Normalizar. Multiplicar una variable (o una 
o más cantidades) por un coeficiente numé- 
rico para que otra cantidad asociada tome 
un valor dado. Sinónimo de escalar. 


NOT. Operador lógico booleano que repre- 
senta la negación. Si P es un elemento cual- 
quiera, NOT será verdad si P es falso, y fal- 
so si P es verdadero. Su tabla de verdad es 
la siguiente: 


P NOT P | 

0 1 

1 (0) 
NOT-AND. Idéntico a NAND. 


NOT-OR. Idéntico a NOR - 


NOT-IF-THEN. Exclusión. 


Notación. Sinónimo de representación. Indi- 
ca los métodos utilizados para representar 
números o expresiones matemáticas. 


VOCABULARIO DE INFORMATICA ' 


Notación binaria. También llamado sistema 
binario. Notación en base dos. Es el sistema 
numérico más utilizado en Informática. Un 
bit puede ser 0 ó 1. La representación de los 
números utilizando dígitos binarios se llama 
notación binaria. 


Notación en coma fija. Representación de- 
cimal con un formato tal que se reservan al- 
gunas posiciones para la parte entera del 
número, y otras (a partir de una posición es- 
tablecida de antemano) para las cifras deci- 
males, 


Notación en coma flotante. Representa- 
ción de un número en forma exponencial. 
En la representación en coma flotante se uti- 
lizan dos campos (aparte del campo de sig- 
no), uno donde se almacena un número 
decimal de la longitud necesaria para con- 
seguir la precisión que se desea obtener 
(mantisa). El otro campo almacena el expo- 
nente al cual hay que elevar el número 10 
para que la potencia resultante, multiplica- 
da por la mantisa, sea el número (parte en- 
tera más parte decimal) que se desea re- 
presentar. 


Notación hexadecimal. Representación de 
los números en un sistema de base dieci- 
séis. Los dieciséis dígitos hexadecimales 
suelen representarse mediante los números 
del 0 al 9 y las letras A a la F. 


Notación polaca inversa. Forma especial 
de representar las expresiones algebraicas 
en la cual los operadores siguen a los valo- 
res numéricos. Por ejemplo, si se desea rea- 
lizar la suma de 3 + 4, se podría escribir + 3 
ENTER 4. Con la notación polaca inversa, los 
operadores son los que se colocan al final, 
escribiéndose, por ejemplo, “3 ENTER 4 +”. 
Este tipo de notación es utilizado en muchos 
modelos de calculadoras. 


Núcleo magnético. Trozo de ferrita que se 
utilizaba en la construcción de memorias 
centrales magnéticas. Cada núcleo sólo al- 
macenaba un bit. Este tipo de memorias se 
van sustituyendo actualmente por otros sis- 
temas de memorias electrónicas. Sin embar- 
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go, la ventaja de las memorias magnéticas 
consistía en que al dejar de alimentar el or- 
denador no se perdía la información escrita 
en ellas (no eran volátiles). 


Nulo, carácter. Carácter de control que sir- 
ve para rellenar espacios. En el código AS- 
Cll este carácter es distinto del cero numé- 
rico. 


Numérico, carácter. Dígito. 


Numérico, código. Código cuyos elementos 
son únicamente dígitos y caracteres espe- 
ciales. 


Numérico, control. Control automático de 
un proceso, realizado por un dispositivo que 
utiliza en todo o en parte los datos numéri- 
cos que le facilita un micro (introducidos ge- 
neralmerte como operaciones en el proce- 
so). 


Numérico, teclado. Teclado de las calcula- 
doras. Se denomina así especialmente al pe- 
queño teclado independiente (cuyas teclas 
están colocadas en el orden que suelen es- 
tar en las calculadoras de bolsillo), que exis- 
te en los ordenadores, separado del teclado 
general. Sólo contiene teclas numéricas. 


Número real. En informática, un número 
compuesto por dos partes, una decimal y 
otra entera, separadas por una coma. Pue- 
den ser representados en forma exponen- 
cial, mediante una mantisa y un exponente. 


Números aleatorios. Sucesión de números 
que no guardan ningún tipo de relación 
unos con otros. Sinónimo de números obte- 
nidos al azar. En casi todos los lenguajes in- 
formáticos existe una función para obtener 
números seudoaleatorios (casi aleatorios). 


Números complejos. Números constituidos 
por dos partes, una real y otra imaginaria. 
Surgieron para poder representar los resul- 
tados de determinadas operaciones, como, 
por ejemplo, las raíces cuadradas de los nú- 
meros negativos, 


